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TEN. EXCEPT 




iTION. 

NO RESPONSIBILITY FOR Tt€ USE OR RQ.IABiLITY OF 
ON EQUIPNENT UHICH IS NOT SUPPLIQ BY DEC. 



3E0 0001 



COl 



SEQ 0002 



I. 



«STmCT 





.IH6 nULT] 

ONLY ore VTSQ/S2 IS TESTED AT OME TIHE. 

mTTEms OISPLAYEC on THE 

HMTQR 




PWrr 2 I S ft J CEVBOflBD CHBRRCTEW 

THE^wir«t_i5^^rajTif 




ySb TO tSP' 




jTE TIC!. 
" 6PERAT0R 



j|OP^^HH|NAHEY IS OCPfCSSED, 



' '^._Sir<U» T«_«E» HOOE OF OPPStIOW 




2. HEQUIfPPffS 

2.1 EflUIPTICMT 

reP-11 FfftlLY COMPUTER UITH 8K UOROS OF HEHORY 

VTS^B^H, S2 VIDEO TERHINM. CONCCTED VIA A 0L-11A>« TYPE 

2.2 STORAGE 

THIS PROGRAH USES BK OF ICHORY. 



j 



DOl 



SEO 0003 



3. 



UMim PROCEDURE 



PROCEDURE FOR NORNflL BXfMRY TAPES SHOULD BE FOaONED. 
STMTINC PROCEDURE 



CONTROL SWITCH SEHINGS 
STMMRO PDP-11 FORNRT 




KEYBOARD CHARACTER TEST ONLY 



1 




11 



TYPEOUTS 





^"^^^0R> 



= 1 IS 




TEST 



ALUAYS A 1 



REG 



9ECXAL NOTE: 

UITHOUT A 

17M AA 17b AS A -0 
"ECTIVELY. THEf 



IF nC COMPUTER UTILIZED 
A SHITCH 




A LSI 11 OR A COHPUTER 
UILL UTILIZE LOCATIONS 

IITC 



IZE LOCAT 

m 



STER 
INC 



STARTING 



no 



1 1 : 



OR 




: (SYiOAm CHARAC 
VT-50 I 



CHARACTER TEST 

TAL VALUE LOOP 
CHO LOOP^ 
PRODUCTION 



EOl 



SEQ DOOH 



5. 



0POWTIN6 PROCOXIC 




THIS PROGMH MJ.0H5 THE OPEMTOR TUO HOOES OF TEST PA1 






selection: in this NOOE the OPEMTOft HILL BE REflUIREO TO 

TYPE. IN ON T»C CONSOLE TTY THE FIRST ANDLRST OCTAL BRSE 
fCORESS OF THE 0L-11*S TO WHICH VT-SO'S ME COIfCCTED. 

•\" RESPECTFULY. 




miw test'^t^^E/SmS 

THE LETTER OF T« 



F DURING THE EXEi 



flW SU 07 




TO LOOP ON. 



T PATTGRN^AjCY IS DEPRESSED 
UILL^R^PORTO) TO THE 



Ttf^S&MCTER ISecIivS hSwt^A^ OR "^^ AN ERROR MILL BE REPORTED. 
Tit CODES -X-OFP* AND "X-ON" ARE THE ONLY E^EC&TIONS. 



FOl 



SEO 0005 



6. 



7. 




8' 





^G^^ POINTER TABLT 
t>€ FOUOHING: 



^ : mir^lT^ S^crvri^gUo. TEST 
TSTNUn- T^ PATTIrN NUnSOFFAILI^ TEST 

^D - 




RESTRICTIONS 



8. 
8.1 



8.2 



8.3 



A. THE OPERATOR SHOULD SET SU 15 AND 13 IF TIC VTS0/S2 IfOER TEST 
IS T»C CONSOLE TTY. 

8. ONLY ONE VT50/S2 CAN 8E TESTED AT OIC TINE. 

C. T||^F|RSTT»C AFTER LOADING THE PROGRAM. T»C TERHINAL IDENTIFIER 

HISCELLANE0U 5 

EXECUTION TINE 

BimJi^lSa^^o^WoH^cS^'l^^^^ 

TjC gYgA»j^OggAg^gflRACTER TEST HILL NOT EXIT UNTIL 



DEVICE ADDRESS PROGRAH LOCATIONS (AT APPROX. 12H0) 



IF SEVERAL VT-5Q'5 



T»C LOCATION "FIRST" CONTAINS TJC FIRST DLU ^^^^ « 



«N0 




IF THESE LOCATI0I6 Al 




COPIER SAVE PAPER SNITCH 

[ER IS I ^ 

- Firer Pft 

THIS ^DUCEI 



IF SU 10 s 1 

HI 




ON 



TEST! 



T STHRT 




m 



PROGRAH IS RUN FOR AN EXTI 



PAPER USAGE WHEN THE 
PERIOD. (LOC. PTCT IS • OF PASSES) 



GOl 



SCO QOOb 



9. PROGfMI OESCRIPTION <SCRECN> 



9.1 A TDMXrML lOQfTIFICATION TEST 



(lE.^fBR: il^ Lircs.Tc.fl <oirect cursor aoorIssing) etc.) 
IF m itcstNED OR m in6orrect response is recieved, the progrmi 

ASSUCS VTSOA HOOa (IE. 12 LINES, NO COPIER, NO D.C!a., NO EXTRA KEYPAD). 

9.2 B FULL SCREEN OF THE LETTER E 

iU? Hit!: [SUI iSI^ SjiH^FS is^- 

CtMRACTOt IN Aa LOCATIONS 

9.3 C DATA PATH AM) RAN NOISE TEST 

THIS TEST Uia PRODUCE TMO F ULL SCREENS OF A yORST CASE 
NOISE PATTERN FOR THE SCREEN RAH AND T»C DATA PATH. 
ALTERNATING LII^OF TIC FOLLOHING 
PATTEmS SHOULD K DISPLAyST 

9.H 0 SIff>LE CHARACTER SET 

Lllf. OF EACH CHflRACTER 

(SOQHO Ti«U 137)0F TIC CHflRACTER 

SET/ THIS HILL ALSO TEST THAT Aa HORDS 

IN TIC SCREEN RAN CAN BE LOADED. 

THIS Uia ALSO E)CRCISE THE SCROaiNC FUNCTION. 

IE: 





9.5 E INCREICNTING AND SLIDING CHARACTER SET 

i-Itf OFAN INCREMENTING 
I SET ACROgTHE FULL^ 
HITH TICWDE HQ (SMOD 
_ _ LINE SHOllFfiEGlN HITH THE 
CHARACTER (COOEHl) ETC. CONTINUE 
THE PATTERN BY IfJaWENTlNC THE 
FIRST COLUHN CHARACTER UNTIL THE 
FULL CHARACTER SET HAS BEEN EXHAUSTED. 

THIS PATTERN Uia VERIFY THAT THE FULL 
CHARACTER SET CAN BE DISPLAYED IN EACH 
SCREEN UORD. 



9.b F CURSOR NOTION 



SEQ 0007 



AFTER: 




jttbSh^ 

amSOR FUNCTIONS 



HOI 




UPON COHPLCTION OF TIC SETUP THE 
J^INKING CURSOR UILL K TO THE RIGHT 



TO TEST "CURSOR UP": 



JTE CURSOR UP b/12 TirCS RND 
DTSPLAY A "X- 



TO TEST -CURSOR LEFT: GENERATE CURSOR LEFT (BACKSPACE) 

FOURTY FOUR TlfCS AMD DISPLAY A "X" 

TO TEST "CURSOR DOHT: G|^ATE^Cy^ OOMN b/12 TINES AND 

TO TEST -CURSOR RIGHT; GENERRTE.CURSOR RIGHT FOURTY THO TINES AND 

DISPLAY A T 

TO TEST "CURSOR HONE": GETCRATE CURSOR HOfC AND DISPLAY A "X" 



♦X«- 



101 



SEO 0006 



9.7 6 JOB, BACKSPACE AND BELL TEST 



THIS PAT 



MIL im THAT 



r FUNCTIONS CORS£TLY 
£_L»C ISINQ^^S 



FROn EACH 



A^EATTli ScmRRACTET IN THE FIRST TAB COLUNN ACROSS THE SCREEN. 



mm 




STARTING AT THE RIGHT EDGE AND EXTENDING TO THE LEFT. 



ti 

♦lA 

•flAA 
•flAAA 

♦{ aaaa^ 



[AAA 

f AAAAQ 



lA 
lAA 
lAAA 
lAAAA 
lAAAAA 



lAAA 
lAAAA 
lAAAAA 



I 
I 

lA 
lAA 
lAAA 
lAAAA 
lAAAAA 



I 
I 

lA 
lAA 
lAAA 
lAAAA 
IfYMAA 



I 
I 

lA 

lAA 

lAAA 

lAAAAA 



I 
I 

lA 
lAA 
lAAA 
lAAAA 



lA 

lAA 

lAAA 

lAAAAA 



I 
I 

lA 

lAA 

lAAA 

lAAAAA 



^t mSMfUS T|WWiAAQ TMAf^^ T />A#>A/W\ T AAAAAA T AAAAAA T AAAAAA TA^aAA TAAAAAA TQAAjMA 

• XrWwwW AwiHwiH A^^^^^^n^ A^^K^vinR ahh^^^rh An^nnRn A^nn^^^R Afwin^viR xnnn^^nH jinnn^^^^^ 



(REF.LIIC USING SPACES) 



XXXXXXX)00000000000000000O00OO0O000000000O00OO0OOOOO00O00O00OOO00OOO0OO00OOO^ 



9.10 H ERASE FROM CURSOR TO END OF LINE: 



H.I 
H.2 
H.3 
H 4 

h!s EXECUTE -LF- 

^EALH^3.IWU H, 




_ OF the CHARACTER "E" 
HONE** 

CURSOR TO END OF LINE- 
RIGHT 6/3 Tires 



SiSlI 





i 'F^FPg^^g^fF^n^^^^^H;H•p 



333333333 333333 333 3 3 3 3^3 333333 33333 . 
333 3 3 333^3 3 33 3-333 3*3*3 '3^3 3 3 3 3 3 3 3 3 3 33 3 '"3 3 3 3 3 3 ■ 
3333333 333 3333'3333a333 33333333333'3:j3j3'333'3^3 
333 3*3 3 3*3 3 3 3 3 3 3 3 3 3 33 3 3 3 3 3 3 a 3 3 3 3 3 3 3 3 3 3 3 3 3X3*3 3 3333333333 



EEEEE 



XO (BLANK LINE) 

X& 

XIS 

X18 

X2M 



XM2 
XHB 
XS4 
X60 
Xbb 



JOl 



S£0 0009 



9.11 I ERASE FROn CURSOR TO END OF THE SCREEN: 

OF THE CHARACTER 




TXON THE PATTERN MILL 
OP LEH OF THE SCREEN. 



9.12 J VIDEO COUPLING: 



T 
T 



3333333333 133333 ;J3a 3333 3333333333333: 



T 
T 
T 
T 
T 
T 

T ^£^fe^i;^^^f^^^tl;^^^l^^^yF^fF^^rl^^F^^f^>^ 




3^3333 « 3 3 3 T« 3 3^^3 3^ 




9.13 K DIRECT CURSOR A00RESSIN6 (O.C.A.) 

AN -ESC-r AND THE SECOND WITH AN "CODE 16". 

EACH OF TIC LINES SHOULD APPEAR THE SANE. 
9.1H L HOLD SCREEN TEST 

A FULL SCRSN SCROLL IS EXECUTED AND A SUB-TeS. JI^ 

THIS Uia CAUSE AN "X-OFF** TO BE SENT AND THE SCI€EN IS 
ItWIBITEP FRON SCROLklHG^jANY^ADglgOg^^ 



INHIBITED FRON SCROLLING. I 

S4lH^ w ... , 

SHOULD RECEIVE AN -X-ON". TO CHEi 




„ ^C^ NODE AND 
SILO OPERATION. 



THE NESSAGE "TESTING SILO REG" SHOULD APPEAR UNDER THE s6b-TEST TITLE 
FOaOUED BY "SILO TEST OOTC" ON THE NEXT LINE. 



KOI 



SEO 0010 



COPIER TEST PATTERNS 



THE 




T pa: 

tmj- 




9.1S H GRAPHICS N00E4OERSE LINE FEED TEST 

THIS TEST IS EXECUTED ONLY IF UNIT IS A VT52. 




rt ONE CHAR. AFTER 
_)nOH LINE OF THE 

UILL FORH A COWLETE SERjg OF GRAPHIC CHARACTERS UHICH 

{P'^RfSliS^LiSS FSo'^iSw^^dPERATIONM. A SINGLE 
LINE OFSaPHICS CHARACTERS UIU BE GENERATED 
ON LINE 0 ONLY. ' 

9.16 N COPIER - AUTO COPY NODE 



THE AUTO-COPY 




THE COPIER SHOULD T»4 START. 



PROGRAM 

)Y TINE. UHD4 THE PROGRAM DELAY IS COMPLETED ANOT>CR LINE 
OF 'E'S UILL BE DISPLAYED AND THE (^lER SHOULD START AGAIN. 

THE rCXT SUB-TEST UOULD PERFORM IN A SIMILAR MANNER. 
9.17 0 COPIER - FULL SCREEN OF TIC LHTER E 
SAME AS SCREEN PATTERN 

9.20 P COPIER - DATA PATH TEST PATTERN 

.SANE AS SCREEN PATTERN 

9.21 Q COPIER - SINGLE CHARACTER PER LINE 

SANE AS SCREEN PATTERN 

9.22 R COPIER - ROTATING CHARACTER TEST 

SAME AS SCREEN PAHERN 



LOl 



9.23 S COPIER • PERnCTER TEST 



ECE 
EEE 



3 3 a:<333333 3 3333333333333 3 3333 33333333 3333333333 a aa: 



a 333333 33 333333333 33333 3 a333aaa333333a3aaaaaaaaaaa- 



9.24 T COPIER - DISCCAIICR STATEHENT 

IN THIS TEST THE OISCLPHER STATOCNT FROM THE COVER PAGE 

CHECK FOR ERRORS. 

9.85 U PRINTER CONTROLLER NOOE TEST 

A 'ROaiNG* PATTERN OF INCREHENTING CHARACTERS IS 
ISSUED TO THE UNIT AFTER PRINTER CONTROLLER 



9.2b V PRINT SCREEN TEST 

THE SCREEN IS FILLED WITH 24 LlfCS OF 
PRINT SCREEN ESCAPE SEOUDCE IS TIC IS 
24 LINESSNOULO BE PRINTQ). 

9.27 H AUTO PRINT TEST 



gPERATION IS SANE AS AUTO COPY TEST 
THEVRINTER, RATHER THAN THE COPIER I 



'E'S. T»C 
SUED AND ALL 



T THAT 
THE DESTINATION. 



SEO 0011 

I 



MOl 



SEO 0012 



4.a X KEYBOMD CHPMCTER TEST 




9 VERXFYjrHRT CORRECT CHPRflCTER COOES 

REPRESSED. 

OM THE SCRlpt. in OPERATOR SHOULD 
^ EXCEPTIOr" 



AT A TINE. WITH SOtC EX(»>TIONS 
REQUIRED to SKIP THOSEiIyS THAT 
IF >HE^IT VT50. T»C PROGRAH MVL 




SU 0 AM) 1 ARE USED TO 
EXPECTED PARITY. AN INCORRECT 
IN AN ERROR. 



9.31 Y KEYBOARD OCTAL VALUE LOOP 

UHEN A KEY IS 
SCO. THEOCTAL VALUE UlUL BE DISP&YED. 
THE CHARACTER hS A mrrTABLE WARACTER. IT UILL BE DISPLAYED. 
IE COOES DEFINED AS -CONTmi? UILL BE DISPLAYED AS A 
LETT^NfoiONIC (IE. OEsOELETE, « sgELL, CLsCURSOR LEFT ETC.) 

9.32 Z KEYBOARD ECHO LOOP 



UHEN A KEY IS OEPRESSGDp THE CHARACTER UILL BE DISPLAYED. 
^ mOIFICATION OR DATA TEST IS PERFORfQ. THIS TEST CAN 
BE mb TO DETERNINE IF THERE IS A "UART 

LirCPROflLQ!. UHEN THE VTSO^S IS IN LOCAL 

THE CHARAC^ SHOULD BE ECHOQ CORRECTLY. IF NOT, THE PR06LEH 

15 IN THE vTM uHrrriF To^Norc' 

t THE CHARACTERS ARE IN ERROR, THBS IS A UART/ 
[AL LINE PRO».£H. 



_ _S A -UART** OR SERIAL 
52 IS IN LOCAL NODE (NO UART/SERIAL LINE) 




sea 0013 



11 

[1] 
[11 

\\\ 



ID 



mCYll 27(732) 24-«J6-7b lH:m PAQE 1 



NRIfCeC-ll-OZVTC-C 

CHT^CC)1?75. 



BOS 



OOUQO 

17777* 
1 77774 

M 

177570 



1 1 1 1 1 1 



1 1 1 1 



1 1 1 1 



1 1 • ic 




1 i 1 


1 1 • 


■ -•■♦^ 

1 1 1 




. ♦ ♦ ■ 

1 1 • 






111(11 


Q003HO 



I • I I I 



I ' ) I • I 

^ • • . 

I I I I I 



I I I I I 






|«mOGRW BY MrmOMD SHOOP 



.SBTTL 



mSIC DEFINITIONS 



i«INITIM. gQDRESS OF T% STACK POINTER tM 1100 Mf 

jlPROCESSOR STATUS HORD 



STACK* llflO,.^ 




177570 



KENERflL PURPOSE REGISTER 



IWT 

SUITCH REO: 
SNITCH REGISTER 



Rls 
R!fs 



xo 

XI 



■mi 



xs 





T REGISTER 



iiPRIORITY LEVa OEFINITH 
QOb 0 
PR1« HO 



org 

;miORITY 
PRIORiTY 
PRIORITY 

PRlglTY 
PRIORITY 

mm \ssk » 



nrt» 
PR5« 

PR^ S8 

Lff-gJITCH_RCSISTER" SWITCH DEFINITIONS 

ilHs 
U3« 





fV^IiSIC-ll-OZVTC-C mCYli 27(738) 9HWG-76 IHiHl PMC I-l 
mtot.Pli BASIC OCFXNITK 

(1) 

(!) 
(1) 
(1) 



C02 



SCO rais 









B 




INITZONS (BITOO TO BXT15) 



icn 



000034 



BESVEO 10 
TBITVEOIH 
TRTVECs IH 



TRAP VECTOR 



MO OTHBt ERRORS 

R^ERVp RIO XLLCGRL INSTRUCTIONS 

TRAcl^TRRP 

BCRKPOINT TRflP (BPT) 

^g/^ljTPUT TRRP (XOT) MSCOPEM 

EHULATOR TRAP (ENT) ttttERRORw 
-TRAP- TRAP 



«ftI«CC-ll-OZVTC<.,^ 
0ZVTK.P13 M5IC 



(1) 

13 
14 



NMYll 27(732) 2H-«Jfi-76 IHxHl PAGE 1-2 
OCFINlfiONS 



DOS 



S£0 ODib 



(] 
(] 
( 
( 
c 
( 
( 
( 
( 
( 

c 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 




m m m 



10 
IH 



0 000224 



000137 






REQUEST VECTOR 



.SBTTL OPEMTIONM. SUITCH SEniNGS 



SWITCH 

IS 
14 



8 



USE 



HRLT ON 
LOOP ON 

ElMBi SAVE COPIETpRPER NODE 
LOOP ON TEST IN SUR<7:0> 




.SBTTL TRAP CATCICR 



;1RLL mSo 



^ LOCATIONS FRON 4 - 77b CON TAIN ft ■.♦2.HflLr 

.SBTTL STARTING flOORESS(£S) 



IN 



001376 



JHP 



NANFU 



jiuir'TO^I 
jjUHP TO 




• n ; x-v- 



OF PROGRfM 



CHARACTER TBT 
VALUE LOOT 
LOOP 



;JUHP TO U.F. SPECIAL TEST PARAH. 



I 
I 



HftlWEC-ll-02VTC< 
0ZVTCC.PX3 



H flCYIi 27 (732) 
STWTIftt AOOIIeSS(ES) 



E02 

2iH«JG-7b IHtMl PAGE 1-3 



SEQ 0017 




.SBTTL CONNON 
.«1100 



TAGS 



AINS VARIOUS COmON STORAGE LOCATIONS 





CONTAIte 
CONTAINS OF ;i 

SNTAiii '8ooo' ^ 




AIf6 (( 




) MS OBTRINB) 



miND|C-ll-OZVTC-C 
0ZVTCC.P13 



(2) 
(1) 

l{l 

(1) 
(1) 

ili 

(1) 
(1) 
) 



mcYii 

TAGS 



F02 



001170 



00117H . . . 
00117b OOOOQO 






hi 0012S2 



177510 
iOOOU 



27(732) 2H-MI6-7b 14:41 PAGE 1-H 
.SBTTL ERROR POINTER TABLE 

;tTHIS TABLE COr«TAINS TIC XirORPIATION FOR EACH ERROR THAT CAN OCCUR. 
;fTHE INFORNATXON IS OBTAlfo BY USINGTHE INDEX NUHBER FOfO IN 
ILOCATION SITEHB. THIS NUWOt IfCICATES UhIcN ITEH IN THE TABLE IS PERTIfCNT. 



SEO OOIB 



ii 



3 



SITEN 1 



Tl 



;ITEH 3 



;ITEH 4 
;XTEH 



FIRST; 177560 

LAST: 0 

VTNOU: 177S60 

PTCT: 100011 

TSTNUH: 0 

TIHEO: 300 



W 18 l!l IS?!! F«mT 




KRRPC VTNOU TSTNUH 



NO HO ST irrUT FLAG RECEIVED 
ERHPC VTMM TSTNUH 
mfC VTNOM 



lERRPC VTNOU TSTNUH SGDOAT ttOOAT 



; INVALID BUSS ADDRESS, TRY AGAIN 



FIRST DEVICE ADDRESS OF SEQUIENTAL X-ll-A/8 TYPE OEVIC 




. TYPE 

ICE BUSS _:: 

~ SAVE COUNT <LdU BYTE> 



{CHARACTER FLAG TIHEOUT CONSTAHT 



I 



000005 



I I Ml • 
I'l'l'l-St 




001332 022626 
0013M 104005 



m 

001350 




001756 




001756 
010172 001756 
007316 001756 

uOOOOl 001326 

Q003N0 177776 
O^llOH 

001132 

QOUOO 




K3042 

000340 000032 
024110 000034 




TOTALC: 

VHO: 

vjU: 

pBt6hT: 

vriil 

VTOS: 





132. 



BUSSTR: CtP 



BEGIN: gOjj 

CLR 
NOV 
NOV 

Si" 

KCXN3: KV 
BEGINl; NOV 





GOS 

PME 1-5 



SO OOlS 



;0R 67 
1«0. 



;0R 200 




.N OATA 
OUT STftT 

FIRST NON-VflLlO CHMWCTER 
WP REG'S 

COLUHN COUNT FOR LINE PRINTER. 



;N0N-ZERO IF SA « 22H 



5 




;POP STACK 

•INVALID BUSS ADDRESS 



I^.NHERE {STARTING ACCEPTANCE TEST ADDRESS 
HFTEST 



,aa4 



GXNA 

m 

•TSTl.liCRE 

GIN 

2gjKCH.MRE 

•KRBTST.ItCRE 

GIN 

•340.aiPS 
•iMtAG,R6 

' STACK^SP 

llj 



|isT8lif-A00Rg& 



HEMOR^lEnTVEC 
•340.9l&fTVEC^2 : 

htrAp.sstrapvec 



START AT ECHO LOOP 

STARTING CHARACTER TEST ADDRESS 

STARTING CHARACTER LOOP ADDRESS 



LOCK OUT AU INTERRUPTS 
FIRST LOCATION TO BE CLEARED 
HENORY LOCATION 

UVEL 7 

^HT VICTOR FOR ERROR ROUTINE 
;TRAP VECTOR FOR TRAP CALLS 



(732) ?HWe-7b m:Hl PAGE 1-6 




0017U 





157Q Q0U12 



0012H0 

160Q00 0012H0 



000004 



0012H0 0012HH 



no 

IbH 002014 



011S3H 
Q1153H 

012S3b 

001326 
012S36 



HQS 



SEO 0020 



Hi: 



IMTl 

RDOCT 

NOV 

TST 

NOV 

CLR 

S8EGIN: NOV 
RSTRT: NOV 



NOV 
Jlf» 

UHDE: TSTl 
•MMfffil 
••TEST 1 




-PROGRM COUNTER 
THE LOOP fWk&\ 



FOR SCOPE 



.ailOTVEC 



;TCST FUtt 

•BR IF N0N-2ERO 



'SPmFIRST 

libddlo. FIRST 

L«ST 



SLAST 

i|7ai4 

FIRST, VTNOM 
•VTIS.RO 

vtnou!ri 
ri.(r6h 

(Ri)> 
R1,(R0)« 

R1,(R0H 
R1,<RQ) 



iBR IF CLEARED 

; FIND OUT THE DEVICE RODRESS 
;SAVC THE RODRESS 

:Fir«> OUT THE LRST RODRESS 

_ LAST ADDRESS 
T IF VALID 



;LOAO INITIAL DEVICE ADDRESS 
ER 

STAT 



t$Tl: 



H914 

JSR 

RFI 

r 

NOV 
JSR 



;JUV TO STARTING ADDRESS 

ISW WW W ■ WVWVWwVWMW ■■■vwwww 

tlwM&aiilllMiMIIMI 

RS.ANSG ;OISPLAY HEADER 

RS.AHSG ;SEND REQUEST FOR IDENTIFICATION 



PC.GETCW 
2S 



GET A CHARACTER 

GET A CHAR. 
;eR IF NO INPUT 



NflIWCC-ll-02VTC-C 
DZVTCC.PI3 Tl 



b7 



A 



27(732) 2H-AJG-7S 14:41 
TEiniNflL lOENTIFICflTION TEST 



1-7 



lOS 



SEO 0021 




100 IL 

78 00210b 001011 
73 



83 8ki12 126037 
120 OOlHOb 

U 
1( 
l' 

g 002134 



001326 
001322 



101: 



C 

ST 

CHPB 




;GET A CHAR. 
;;« IF NO INPUT 

;mSK BIT 7 



CHAR. 





T Fl 
TO 

TEST SECON) CHAR. 
BR TO ERROR 



;NOU DETERHirC WHICH VT5XX AND ITS CHARASTICS 





002316 
002316 



CLR RO ; CLEAR INITIAL POINTER 

001324 31: CNPB TYPEPT(R0),SAVE3 ;TEST I.O. TO KNOUN VALUE 

TSTB TYPEPT(HO) CICCK IFHORE VALID I.O. 'S 

BC 3S BR IF nORE 

IS: ERROR 3 INCORRECT I.D. CODE 

IIS: CLR RO DEFAULT TO VT50A HOOE 



002136 
144 

S7 002160 
M 002162 

^ mm 

202 002204 



20S 002216 



016037 

m 

016376 

012737 

8{ln7 
005737 

006337 
062737 



0 ^ 16 
011534 



uui/Ob 




001256 

001262 
001264 
000014 

81264 
1266 

000140 



001256 
002160 



001262 

SiiSS 



001260 

001266 

001270 

001306 
001256 



;HRVE NOW FOIH) THE 1.0 
4S: 



5a: 
13S: 



6S: 



NOV 

VTSOA 

NOV 

NOV 
TST 

I& 

ASL 
AOD 

NOV 
ASR 
NOV 



r.'?t3»T(fi0),VT5)0C 
""",TYP(R0).5S 

itANSG 



215 002272 

(1) S0OO 

218 002302 

214 002304 



000040 001306 



000403 

104002 
000713 



7S: 



2S: 



NOV 

Ul 

AOD 
BR 

ERROR 



•%O..TOTALC 

VT5ib( 

Stalc 

VHO 

•12.,LASTLN 

VHn.VHl 
VHl 

VH1,VH2 
VH2 

•14Q,LASTm 

•40,LASTCH 
12S 

2 

US 



- REPORT TO CONSOLE 

SAVE I.O. AND CHARASTICS 

POINTER TO VT5XX HESSAGE 
LOAD TOTAL CHARACTER COUNT 



dca testing 

test if 24 lines avail 

Sj£t'%«racter count 
adjust line count 
adjust valid line • ^40 

LOAD OTHER LlfC COUNTS 



I'JPDATE TO ALLOU UP-LU CASE CHARACTER SET 
;;BR AND START TESTING 

;N0 RESPONSE FROR UUT ADTER ASKING FOR IDENTIFY 



/TS.P13 



02VTC 



Tl 




002316 000101 



I i-jc:. 





f 1 1 1 • I 



1 1 1 1 1 1 



f 1 1 1 1 1 



1 1 1 1 1 1 



1 1 1 1 i 




01656S 

811^ 

^ 00236 4 017007 
00S366 000000 





1 1 1 1 1 



i 1 1 1 i I 



1 1 1 1 i I 



< III 1 1 



«CY11 27(732) 24-flyC-76 14:41 

A TERHIfML loSfTIFlCATION TEST 



J02 

mOE 1-8 



SCQ 0022 



011394 



OOSHOO 000004 

m, m ""^ 

002410 004737 012474 



270 002414 004737 011354 



12S: 



;;BR AM) START TESTING 



11 



mi 





SSINC (ESC Y) ♦ -ESC-r ♦ "ESC-O- 



UPPER AND LONERCASE CHARACTERS 

reirgER (WifccTEO 

VT52X nXXL 



mi 

LOU BYTE CONTAINS THE I.D. FOR EACH KNOUN VT5?? 
TYPEPT: 



i 



WORD 
UORO 

UORD 
UORD 
UORD 



000101 
040102 

« 

135113 
17S114 
137115 



I.D. = 101 
I.D. = 102 

\± I m 

I.D. = 113 
I.D. s sll4 
I.D. s 115 



VT50A 

VT50B COPIER 

vrSH^piJ^fcA^vriSH keypad 

VT52 

VT52 UITH COPIER 
VTS2 UITH PRINT&. 



: ASCII MESSAGE POINTERS 
HS6TYP: 

VT55 
VT50H 



VT52H 



VT5S COPIER 
VT5QH COPIER 




UITH COPIER 
iVT52 UITH PRINTER 



«TEST 2 B FULL SCREEN OF A CHARACTER 

lf»«f««HHHHI»»f«iM»MliiiMii«fiHii»iMi»iWf*»»f«»m»ttit»i<HHHI«» 

TST2: SCOPE 



JSR 
H91 



RS.ANSG 



;FILL SCREEN UITH A 'E*S 



JSR PC.riLLUC 
JSR PC, DELAY 



NflINDEC-H-02VTC-C 



0ZVTCC.P13 



T3 



mem 27(732) 24-AJ6-76 14:H1 
C DATA TRRNSFER PATH TEST 



K02 

PAGE 1-9 



SEO 0023 




_ 012777 

27S Q024X 013737 



00HS37 
WSi 




011S34 
001266 
0112% 



261 002H% 00H537 0112S2 

2b3 OiSHS** 000052 
284 

0113S4 



011S3H 




001264 

010330 
001312 

ooiSm 

011354 



011534 
000040 

1< 
U 



i 



001310 



001304 
001312 



001312 
001304 



001304 
001312 



;fTEST 3 
tST3: 



DATA TRANSFER PATH TEST 




HOV 



100 
JSR 



IS: 



RS.MISG ; DISPLAY HEADING 

VHl.TENP ;SET-UP A COUNTER 

R5,0TPSR ;SET-UP BUFFER 

'OCTAL 
|«t« '8' 

RS.DTPSRB ;SET-UP BUFFER 

It -BRANCH IF NOT COMPLETED 

PC. DELAY :TEST DELAY SWITCH 



:«TE5T 4 D SINGLE CHARACTER ACROSS AU COLS. <Aa CHARACTERS) 

• ■ K M Iiil llMMIM i llM M iMMMMMMMMMMMlMMIMMmtlilWIllMUM i MM I lM M t 

tST4: 5^ -DISPLAY HEADING 



N93 
HOV 



IS; 



2S: 



HOV 
HOV 
JSR 

JSR 

EC 



NOV 

Si 



R5»AHS6 
•40,STCHAR 
VHO. TEMPO 

PC,XPRNT 
TEHPO 

teo 

STCftAR 

LASTCH.STCHAR 
IS 



;SET-UP STARTIHG CHARACTER 
;L0AD COUNT 

IlSaS A^IuF^eS'uITH^T CHARACTER 
;DISPLAY A FULL LINE FRON THE BUFFER 



INTSHED 



JSR PC, DELAY 



:yPDATE T»€ CHARACjra 
TBT FOR FINAL CHARACTER 
•BRANCH IF NOT COHPLETED 

;TEST DELAY SWITCH 



2 VWWWWWWWHWwW WW 

E 



jiTESTJ 

tlrl: 



SCOPE 

JS 



ROTATING CHARACTERS ACROSS ALL COLS. <ALL CHARACTERS) 
Mtf«Mi«HHHHHHHIfMiffM«f«MM««fHffftH« 



IS: 



NOV 



J! 
UIOTH 



RSfAHSG 
•40,STCHAR 

.TE 



Lie 



.Rl 



;DISPLAY HEADING 

; SET-UP STARTING CHARACTER 

:L0AD TENP 

LOW RlsTO CHARACTER 
LOAD A BUFFER STARTING WITH 
: THAT CHARACTER AND UIOTH <8YTE> 



i«ntiEC-n-ozvTC:C 



LOS 



<ftj. CHRROCTERS) 



8E0 Q02S 



Q02b38 00H737 010330 



00S337 001318 




J7 

023737 

002b70 0013S3 



002672 004737 011354 



011534 




4 QQ4737 OOfiS 

□ 00 4737 00304 0 

_ 34 112720 000062 

002750 112720 000040 




002770 



I •< 1 1 1 



003004 
003010 
003014 



112720 

112720 
112710 
000420 

013701 



000063 



000064 
000377 



000015 
000012 



003066 004737 010330 
003062 004737 011354 




001312 
001304 



2S: 



JSR PC.XPimT 

DEC Toro 

LASTCH.STCWR 
IS 

JSR PC, DELAY 



:0ISPLAY R FULL LXfC Vm THE BUFFER 

;Oorc f 

•BR IF YES 



NOV 
INC 
CtV 



{UPDATE THE STARTING CHARACTER 
TEST FOR FINRL ^WRACTER 
BRANCH IF NOT COMPLETED 



;TEST DELAY 3HITCH 



J S VV VwWW WWW kW WS W W WW W WW V w M'K'mwmM'ffmWwM w wwwwWIC wwivxw WKXivwirirW 

•iTEST 6 F CURSOR NOTION TEST 




WWWWWWWWWWWWTTWWWWWWWTrWWWWl 



R5,AnSG 



; DISPLAY HEADING 



;R0UTINE TO LOAD REFERENCE LINES FOR CURSOR NOTION TEST 
LBNT; 



NOV 
NOV 
NOV 
DEC 



NOVB 



NOVB 

NOVB 

NOVB 
NOVB 



NOV 
1: NOVB 



^C 
RTS 

SVRIG: NOV 
NOVB 
DEC 

LBHTl: JSR 
JSR 



If r fcna RO 

__j,(ROJ* 
VHllRl 

l» 

t40,(R0)^ 

ft\m 

pc'hovrig 

.jm 

VH1,R1 
•15 (RQ)4 
tl2 (R0)4 
Rl 

NOVDNl 
PC 

•48;tRi)4 
Rl 

PC,XPRNT 

pcIdelay 



POINTER 
•5 
Rl 



LOAD 12 

Urn 

RIGHT 
LOAD 13 

NOVE RIGHT 
LOAD 14 



TO NEXT PART 



LORD CR 
LOAD LF 

LOOP UNTIL DONE 
ESIT 

loa8 sWs 
^ until done 

display this line 
test delay switch 




M02 

1-11 



SCO 0026 



HI? 



HIM 003268 
HIS 



Hie omffi 

hIo ifitniS 

hH (S^ib 




u 

lU _ 
112720 

112720 

88h^ 

00H537 
016101 



003332 
003336 



0OHS37 
016101 



000103 



OOOIX 



m 

000377 

81^ 

011S74 
001256 
01153H 



IS: 



NOV 



001256 



2S; 



21f: 



001256 



31S: 



Hf: 



NOVO 

NOV 
BIT 

NOVB 
DEC 



NOVB 

Eg 

NOVB 

NOVB 

NOV 

NOVB 

NOVB 

m. 

NOVB 
NOVB 
NOVB 
NOVB 
NOVB 



JSR 

CRLF 

TST 



JSR 
CRLF 



j^V?50H^TSE 5"S"^SS-0r FOR CUKOR LEFT AND 

Hpy Xbu^ro ji^wwyNL 

Rl 

•IX, (HO)^ 
•HH.,R1 
I^Th.VTSXX 

t33.(R0)> 
•10H,(R0)^ 

§i 

21S 

•10,(R0)« 
Rl 
20S 

•130.(RO)« 
•10, \PDH 

vhi!ri 

•exm.vTsxx 



HO^ 
NOV 

Ul 

NOVB 
NOVB 

8^ 



~CRO)* 
•10&,(R0H 
Rl 
3S 

•12,(R0)4 
•130. (RO)* 




•10^, (R0)« 

Rl 

HS 

•130,(R0)« 

•33.1W)* 

•ll6,(R0H 

•130 (RO)^ 

«377!(R0)+ 

PC,XWHT 

PC'.OELAY 

R5,RHSG 

VT5XX 

TST7 

RSfRNSG 



USE -ESC-B" FOR CURSOR OOMN 

LORD wl^ER POINTER 

lorB 'S^cursor up 

t8S 

LORD COUNT 
TEST IF VTSOH TYPE 
BR IF NOT 
LORD 'ESC' 
LORD ' CURSOR ,LEFT» 

LOOP UNTIL DONE 

LORD -BACKSPACE 
DONE ALL ? 
BR IF NOT • 
LOAD 'X' 
LOAD BACKSPACE 
LOW COUNT 
TEST IF VTSOH TYPE 
BR IF NOT 
LOAD 'ESC' CURSOR DOUN 



LOOP UNTIL DONE 

LOAD CURSOR OOMN (LF) 

8?^F'N0T 
LOAD 'X' 
LOAD BACKSPACE 
LO^ COUNT 
LOAD 'ESC' 

LOAD 'C CURSOR RIGHT 



LOOP UNTIL DONE 
LOAD 'X' 
LOAD 'ESC' 

LOAD *H' CURSOR HONE 



THIS LINE 

•Scroll hore lines 



i«n«c-u-ozvTc< 

02VTCC.P13 T7 



N02 



SE0 0Q2b 




dd33SH lil 

m m m 

437 aSSoTH liSm 

005302 




10 112/20 
003424 004737 




„ mm 004537 
%1 0S»72 000003 
003474 004737 

So^ 
00350b 004737 




011534 



09*312 
000007 

OOOOOb 



010330 
003620 
010330 
OOSbZO 
010330 
003620 
010330 
003620 
010330 
003620 
010330 
003620 
010330 
003620 
010330 



001316 




TAB. BACKSPACE AND BELL TEST 




LRL: 



IS: 



HOV 

novo 

NOVB 
NOVB 
DEC 



NOVB 
NOVB 
NOVB 

JSR 

JSR 

S« 

JSR 

isR 

JSR 

ISR 

JSR 
3 

JSR 

JSR 
4 

JSR 
JSR 

!» 

JSR 



rsR 

jNOU EXECUTE 



10 
DEC 
NOV 
JSR 



IBUFFER.RO 
•7,(R0)I 

•ili.(R0)4 
i4Q,(R0)4 
R2 

ii! 

IS 

•15,(R0H 

pc.xpwrr 

RS^LTAB 

PC.XFWfT 

RS^LTAB 

PC.XPRNT 

RS.LTAB 

pc,yptm 

RS,LTAB 

PC,XPRNT 

RS,LTfle 

PC,XPRNT 

RS,LTAB 

PC.XPRNT 

RS.LTAB 

PC.XPRNT 
THE bAoCSPACE 

UI0TH,R2 

R2 

R2 

•40.R1 
PC.^LBFB 



;DISPLAY HEADING 



LOAD BUFFER POINTER 
.OAO 'BELL* 

.DAD COLUm HARK 
LOAD SPACE 

BR UNTIL DONE 



BR UNTIL FINISHED OLL TAB STOPS 
LOAD CR 



LOAD TAB LINE tl 
DISPLAY THIS LINE 
LOAD TAB LINE 12 
DISPLAY THIS LINE 
LOAD TAB LINE 13 
DISPLAY THIS LINE 
LOAD TAB LINE 14 
DISPLAY THIS LINE 
LOAD TAB LINE 15 
DISPLAY THIS LINE 
LOAD TAB LINE 16 
DISPLAY THIS LINE 
LOAD TAB LINE 17 



iOISPLAY THIS LINE 
SECTION 

LOAD WIDTH COUNT 

aISjust HIDTH 

LOAD -SPACE" INTO THE LINE 
LOAD LINE 



B03 



SCO 0027 




00J720 00H737 0X»7H 
0G37?t a0H737 0113SH 







CHRMCTCR POSITIONS 

cooc 

POSITIONS t 



Akll cope 
rCXT TEST 



;SUBR0UTIIC TO LOm THE TfS TEST INTO THE BUFFER 
LTIB: 



If: 





•101, (R2H 



•ii.cfeu 




iLOfli^THE 'A' CMR. 

t8S 8S 

BR TO vea jm coLum cwr 

T& 



jlTEST 10 M EMSE FRON CURSOR TO EM) OF LXIC 




tSTlO: 

'Tio 

j9h pc.fillmc 

ISR PC.OEUiy 
;UMO ERASE LUC TEST INTO BUFFER 
LOOERL: NOV. m^Fg^RO 



iOISPLRY HEROINQ 






OOfOSO 



•'k|(Roh 




Lire CHAR 



.2 LINES _ 
iT HORIZ. COUNT 



1* 



(3) 



1 1 • 1 1 



I • I • I 



li^eO 000977 



OONOSb 00^737 010330 
OOSOK 00H737 0U3SN 




011S34 
012H7H 
091102 004737 011364 




m im 



(3) 




•12»(R0)« 
31 

•377, (R0)« 

PC,}VfWT 
PC,OELflY 



COS 



SEO 0028 





NOVO 

JSR 
JSR 



CURSOR RIGHT 
huSoR OQUN 

iLOfO TERR 

;DZSPLRy THIS TEST 
;TEST DELAY SUITCH 



jfTEST 11 I ERRSE FROH CURSOR TO END OF SCREEN 

'■ ■■■ ■ ■■■■■■■■ ■ ■■■ ■ ■■ ■■ ■■■ ■ HMMMM i lMM I HMMMMMMHMIMMBlllMlUMMMM 

R5,RnS6 ;OISPLAY HEWING 

JSR KfOELRY ;OCUIV 
;L0RO ERRSE SCREEN TEST INTO BUFFER 



USERS: 
It: 

4S: 



NOV 




;UMO COUNT 
;IQRQ CURSOR LEFT 



SI 



_ic 

BHI 

NOVO 

HOVB 

|» 



33,(R0H 
•'A,(ROH 

f7. 



(R0)« 



m 

SCREEN 

Ibrikn dome 

LOflOBC ^ 

•LORD CURSOR UP 

jtSSTERH 



011S34 



• ■ ■■ ■■ ■■ ■■ ■MimmiMHM M i l« «M H imi l H»I Miii M « l iii H « MM t<HHI 

UtEST 12 J VIDEO COUPLING TEST 

'■ ■ ■ ■ ■ ■IMm a HM I MMMHM i UHM I M I M I i ll H WI UMM M M i MHMHH MIiiti 

' jsl^ R5.RHS6 ;DISPLAY HEWER 



!i 

lib 

;1 




mCYii 27(732) 2H-W6-7b iH;41 PMC 1-15 
VIDEO COUPLING TBT 



D03 



SCO 0029 



001310 
011391 



) 00H2S2 000004 



0QH37H 01 





OON%0 OOW 
OQHHM 013700 
014470 042700 



m 

011534 






001310 



li: 




S!oaAr 



;LOAO CQUNTOI 



FINI9CD COUNT T 



«TEST 13 



OlfCCT CURSOR P00RES5 TEST 



tST13: gOfe 



OCCUTE 



SI 



001255 



m 



lOb 0CRT5T: NOV 
NOV 




Hi 




STED RND USCD RS -X- «0 "Y- COORDINATES 
NO'VISUAaY BY TIC USER 

IN H.r — 

F H.F. 



FIN H.FT nook 

m?^TIFY TEST 

IF VT50H TYPE OISPLRY 
F NOT VTSOH TyR. 



NOV 
NOV 
NOV 

NOV 
CMP 

SI 



024315 



NOV 

JSR 
NOV 
BIC 



msgtAoVri 

2S 

•-l.BUFFER^M 
X7JWflH0 

•ittS&.xo 



sSraTSo IDENTIFY TEST 
;LMD "SPACr RS FIRST VRLUE 

;sBR TO NEXT TEST 
;PRIfC RflrOON NUNBER GENERRTQR 

imriON^^B^FFER 




^R 

TERHINATOR 

;GENERATE RPNDON NUMBER 
GET RNtVQH NUNBER _ 
RRNOOH NO. NUST BE TWO DIGITS 



UB ooMHTM map 



mcYii 

K 



b7H 



677 



(3) 




PME 1-16 



E03 



X0.I37 




LYfiOOS 
IS 




SCO oox 



NO, HUST 




Y COOROII 



THRN >«0 
ION 

T BE QfCBTER THAN 9t OR 67 
INATE 



_ COONDXNBTE 

SiTiP 'Y iriDEX LOCATION FOR PRINTOUT 



NRTE IS SET 




COORDII 



X^SSP Fojl'?SfoiiT. 



THRN 157 
iW 



, flUCWY BEEN USED? 




.ASCII NVT5O-PUJS-OIRCCT-CURS0R-«00RESSINC-TEST\ 



.ASCII \-OICITflL-EflUIPHENT-C0AP.-NAYNAHO-HA.-VTSO\ 



!?NL?i2"lNl TERNINALS HI|X RUN THIS TEST 



fTEST m 



««HHHHIftMiMMfMMMMffM»ii»MMii««ft«M»MHI 

L HOLD SCREEN TEST 



NAirCEC-U-OZVTC-C 
02VTCC.P13 TIH 



F03 

mCYll 27(73gj^^^^-fly^7b m:Hl PAGE 1-17 



SEO 0031 




ii m 

Q061SH lOHOK 



QQ51» 004737 0113» 



♦ ■■■■■■ ■ ■■■ ■ ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■mm ii mMMU Pii HH 

tSTlH: SCOPE 




TST 



8i(E% 
arm 



VT5XX 

NOV tl.XOFFOK 
NOV 11 XOFFBR 



TST 



XOFFRC 
IS 



ERROR 2 



It: 



010750 



2S: 



R5,IVtSG 
2 

JSR PC.OELRY 



as 

GOOSHS 
TST 



;CR-LF 



12 Lire. 





XOFF SENSED 



;ENPBLE HOLD SCREEN 

iiBiBiT TIC scr 

•BY SEWING -XH 
;CtXRR son FLAG 



nOOE FAILED TO 
FROM SCROaiNG 



;OISABLE HOLD SCREEN NOOE 

;TRY SCROaiNG TIC SCREEN 

;TPT son FLAG (X-ON) 
im IF SENSED 

:PROGRAN DELAY 



SCREEN 




001000 0012S6 



011534 



•■ ■ ■ M li»il MMMMMMM»imHIHMHMHIIMmHIHHMMI»MIMmiHHH 

«TEST 15 n TEST GRAPHICS NODE AM) REV. LINE FEED 

[■■MIMMIMMlH I »IMM I M I MHIMI IM I I MI t M t m» ii«ii M iiiiMiiiiMM M iii 

tSTlS: SCOPE 



BIT 

!$ 

GRPHST: NOV 
IS: J 



011534 




fBITOS.VTSXX 

MPTST 
•80..R4 

RS.f - 



;IS UNIT 




REV. LINE FEED 



RSyAHSG 



:HOHE THE CURSOR AND CLEAR THE SCREEN. 
;DISPLAY TEST MESSAGE 



mifttC-ll-OZVTCrC 



TIS 




762 



i 



77H 

(3) 
(3) 
(2) 

780 



0053N0 013^ 








i 





ii^ 

tXEM32 0(HS37 



mem 

H 



G03 



011534 



m221 
JSR 



il3U 

001312 
01153H 
011391 



001312 




m 




PC^XPfWT 
R5|flfG6 

YEHPO 
2S 



PC.DELAY 



ENTER GMPHICS NOOE. 

1 LIfC 

TNE FEED AND 



COUNT 





NO-LOOP 
YES-EXIT GRflPNICS 

AND 00 CHECK DELAY 



001256 
173660 S: 



•■ ■■ ■ ■■■■■■■■■ ■ ■■■■■■■■llllMIMIMMMMIIIMMIHmMIlUMMiliWMlll 

ITEST 16 N COPIER - RUTO COPY TEST ' 

[ ■ ■■■■■■■■■■ ■■■■■■■ii i iMiiimminn wmw WMMiiwiniMii i 

t5ri6: 




001272 
0012% 
011534 
011534 



001272 



61: 






001312 



001312 



0107% 11: 



•BIT14,VT5XX 

SiTST 
^ITll.aSW 

MITlO.aSW 

mCNT 

ScT.PRTCNT 

RS.ANSG 

R5,RHSG 

m 



Tyr IF COPIER IS AVRILABLE 
•Bk IF AVAILABLE 

tor AVAILABLE SO BYPASS COPIPt TESTS 

mi IFXfMIBir COPIIrTEST ailTCH IS SET 

IF Tlii TO TEST COPIER 




F 

IT T 



TO 



lER 






011534 
0113» 



011534 
012474 



11 0107% 



TpPO 

il.XOFFOK 
RSt AN56 

PC.OELAY 



COUNT 

CHARACTgR~INTO BUFFER 

;DISABLE AUTO-COPY 
;ANDTHER DELAY 



•TEST 17 0 

tST17: SCOPE 
It: JSR RS.AHSG 

PC.FiaUC 



COPIER - FUa SCREEN OF A CHARACTER 

»#«HH#«HHI#if 



;DISPLAY ICADER 

;FILL BUFFER UITH CHAR 
•DISPLAY IT 




T17 




H03 

011354 PC.OELAY 



SEQ 0033 





i7M 






OOOOOH 






^ m 



'\0 004537 



ttCST 20 P CQPTHt - DATA PATH TEST 

! WHHHHHHHHK' ' MHWI 



01 1534 



8li 



011252 



t5T20: 



001310 




13U 

QOOQOl 0107% 

oiiSSn 

0113S4 



It: 



VHl.TEHP 
RS,0TPSR 

F5,0TPSR8 



PC.XPHNT 

9S\i 



DISPLAY HEADING 

-UP A COUNTER 
-UP BUFFER 
TAL 

TAL 'a* 
SET-UP BUFFER 
OCTAL *U' 
OCTAL *»• 
DISPLAY THIS LirC 



PC,0ELAY 



lY SUITCN 



011534 
010 

00126 4 001312 

Qooggi 0107% 

011534 

001304 

011534 

000001 0107% 
011534 

011354 



• ■■■■■■■■■■■■■■■■■■ ■ ■■ ■ ■■■■■■■■■■■■■■■■■IIIMIIIIMMIMMIMUMIUHM 

jlTEST 21 0 . ^ COPIER - SINQLE CHRRKTER ACROSS ALL COLS. <Aa CMRACTERS> 

tilSi; SCOPE 

— .-DISPLAY »CADING 



IS: 



NOV 
NOV 
NOV 
JSR 



3S: 



R5f AHSG 

vH^^^m* 

S.FIL^ 

« kI^wt 

EC TERPO 
NOV VHO.TEHPO 

INC STCHAR 
CNP LASTCH,STCHPR 
IS 

R5,AHS6 



A-2 



JSR 



•l.XOFFOK 
RS^AHSG 

PC.OELAY 



; SET-UP STARTING CHARACTER 

;LOAD Rls TO CHARACTER 

•LOAD A BUFFER WITH THAT CHORACTER 

•DISPLAY A FULL LirC FROH THE BUFFER 

;DONE 

;AaOU XOFF 
;COPY INST 

UPDATE THE CHARACTER _ 
TEST FOR FINPL CHAMCTER 
BRANCH IF NOT COHPLETED 
ICRLF 

;ENABLE XOFF 
•COPY INS 

;TEST DELAY SWITCH 



: Mf M««ftf iMW«f f MWHIWHI iM«fff «f •§ if ittif««f «f MM*! f f ffff •§»# « 

;«TEST 22 R COPIER - ROTATING CHARACTERS ACROSS ALL COLS. <ALL CHMACTERS) 



m 

831 00S7 3D 013070 



103 



ctMmiTEre%jlaS oa cos. <«i characters) 



» 0034 




8% Ottfflb 001g7 
860 gObOHH 00M537 



(3) 

(3) 

(2) QObOSb 



OQOOOH 




011534 

ogiaH 001312 

m ""^ 

001304 

011534 

000001 0107% 
011534 

011354 



011534 



061266 001310 
001310 



000105 

jL 

QOOOOl 0107% 
011534 

011354 



IS: 



fSt^ R5,MSG 
HIOTH 

fig If'^ 

NOV VHO.TEHPO 

mv ll^XOFFOK 

JSR R5,M1SG 
QOPRNT 

J9 PC.OaAY 



;DISPLAY tCflDING 

;SCT-UP STARTING CHRRflCTER 




ING UITH 

WDTH <BYTE> 

lY A FXL LINE FROM THE BUFFER 



BWmCH IF NOT COfPLETED 
•CRLF 

;ENR8LE XOFF 
•COPY INST 

;TEST DELAY SWITCH 



' ■■■MIMMMMMUHH iM MMMHHMM M MHIMMim i llMmiUHMIim MI MMM II 

•TEST 83 S COPIER - PERIHETER PATTERN 

| m|MllliliIltMMMlMllMimiMlIMlMHMiM|llM*ll i tlI W*WI 

TST23: 



IS: 



mzo 

NOV 

jr 



HOV 



NOV 
JSR 



R5.AH5G 
•♦E.Rl 

PC XPRNT 
•'E.Rl 




DISPLAY NEAOER 



LOAD STARTING CHARACTER 

FILL THE : 

m 8 hi 

LOAD VERT COUNT 




LAST 



DONE f 



NOV 
JSR 



•i;X0FF0K 
R5f AHS6 

PC.OELAY 



LOAD STARTING CHAR 



;COPY SCREEN 



; HHHHWWIWHIf MM ■ I M ■■ ■ H ■mfffttWfttfffWfff •«••«••««•• WHMHI* 
ITEST 24 T COPIER - DISCLAINER STATEHENT 

t5T24: SCOPE 



nftlHOCC-ll-OZVTC-C 
0ZVTCC.P13 TP* 

Ml 8^ 

n ooseio 



88H 



JOS 

NflCYU 27(732) 24-«JC-7b 1H:41WCE 1-21 
T COPIER • 0I9CLAIHER STflTEMDfr 



SCO 0035 






011S3H 

00bS30 
011534 



00b232 000767 




011534 
0113S4 



0062Sb 000004 




900 00b274 




Q0b3l0 








00b 5& fc 
011534 

011534 



m 
m 

011534 
011364 



OObSTD 000004 
00b4Q0 004737 012474 



006226 IS: 



RSf flHSG 



R4 



i DISPLAY HEflOER 



lOB: 



U 0107% 2t: 



JSR 

1^0 



nov 

JSR 
GOPRNT 



R5,RRSG ;DISPLflY COPYRIGHT 



PRHTST 



(R4)* 
It 



•l.XOFFOK 
PC.DCLAY 



iUPORTE POINTER 



;ErM6LE XOFF 
•COPY SCREEN 

;TRY PRINTER TESTS 



001256 



II WW V Www II 

•tTEST 25 U PRINTER CONTROLLER nOOe TBT 

[ ■■■■■■ ■■ illMMMBMin ill lHMIHMIHMMMMIM I MHMtiiotmiWMMiMt 

» _ lYis^T^f/^*^ PRINTER. 



001304 

010746 
001306 



IS: 



2S: 




•|IT10,VT5)C( 

SEOP 
R5|AHSG 

RSfRHSG 



•4g.STCHRR 

^S«R,LRSTCH 

R5|RHSG 

PC.OELAY 



; NO-EXIT TEST 
•DISPLAY »€ROER 

;ENRBLE PRINTER CONTROLLER NODE. 

;LOflO INITIAL CHAR. 

;8UIL0 A 132 COL. LINE. 

•YES-OISABLE PRINTER 

\wm M EXIT. 



•TEST 26 
tST26.' SCOPE 

Stscn 

JSR 



M M MM M MM M It MM MM MM MMMM MM M MM M 

VWVwWWWWWwWWWWWWwWW 

V PRINT SCREEN TEST 

H MMMMMMMMMMMMMMMM lf ~ 

vvwwwwwwmrwwwwwwv 



^1 



006416 017271 



QOOQOl 0107% 
011534 



J< 
GOPRNT 



RSf AHSG 

PC.FILLUC 

.XOFFC 
AHS6 



{DISPLAY PRINT SCREEN NESSAGE 



•l.XOFFOK 

RS|r — 



;Fia THE SCREEN WITH E 

,0U XOFF, 
(NT THEN 



jAj^OU XOFF/XON PROTOCOL 



F1flIf€EC-ll-02VTC-C 
0ZVTCC.P13 T26 



mCYll 27(738) 24-ftJG-7b 14:41 
V PRINT SCREEN TEST 



K03 

1-22 



sio ao3b 



006420 004737 011391 



006424 000004 



m 

006434 
006440 



m 

004537 
017373 




006556 
006556 



011534 
011534 

001264 001312 

m 



m 



000001 010746 
01x534 

01139* 

006 55 6 



JSR 

WWWWWwWWWWWW 

»TEST 27 



tST27: SCOPE 



iTEST DELAY SNITCH. 

vwvwwwwmniwwvwwvifv wwwww 

MJTO PRINT TEST 
IM«fMM«fftfMfMf«MMfMM«fM«»MftH«fM« 




0107% IS: 



H63R 

JSR 

GORPHD 

NOV 
NOV 
JSR 
NOV 
JSR 

W 
NOV 



OISPCH: ^(TO 

NTEXT2 
NTEXT3 



RS.RNSG 
R5(RNS6 

VHO.TEHPO 

•1 XOFFOK 
PClXPRNT 

ir^ 

•1, XOFFOK 

DC OMC/* 

PC.OELAY 
SEOP 



:DISPLAY HEADER 
•ENRBLE flUTO-PRINT 

;LORO A EXECUTION COUNT 
|l8r8 CHmRC%< INTO BUFFER 

; DISPLAY IT 

^"^D^LAY 




{DISABLE AUTO-PRINT 
; ANOTHER DELAY 
;END OF PASS 




000004 






SCOPE 


005737 


001242 








001242 


001244 


BCO 


001410 






062737 


000010 


001244 


AOO 



ttMMjrMMJUii 

VWWWWW 

.SBTTL END OF PASS ROUTINE 

THE PASS NUNBER (fPASS) 
ICA5 END-. ....w^ 
••TYPE •£» PASS tXXXXr (L™, 
«IF THERE5 A HONITOR GO TO IT 
••IF THERE ISN'T JUHP TO NOHEOP 

SEOP: 



rawwwwww 



LAST 

lI{st,vthoh 

If 

•lO.VTNOH 



TEST IF nORE 

!s ^HIS^THE LAST ONE 
BR IF YES 



NRINDEC-U-OZVTC-C HPCYll 27(732) 
0ZVTCC.P13 END OF PASS ROUTINE 

0017S6 



017617 
001330 
011H62 



24-«JG-7b 14:M1 PAGE 



L03 

1-23 



SEO 0037 




(I) 



IS: 
2S: 

3S: 




710 
716 



005037 001106 

dooni 

01273 7 
OQQQOl 

iohmS 

0137% OOllOH 



NOV 
JHP 
TST 

f!k 

RESET 

1ST 

BEQ 

CLR 



001104 



KOPCT: JjORD 
BGT 
NOV 

9D€01: .UORD, 
lOPCT 



104404 
104400 

000005 
47U 



006757 
000042 



SGET42: 




006734 000240 




»77H 



uu^uub 104404 

007010 104400 006757 
007014 000137 X1716 







SDOMN: 




Sl440 


KNOHG: 


ooii^ 


000 


i^i 


ii 


001756 


lit: 



NOV 



NOV 
BEQ 

RESET 



NOP 

JNP. 




TYPOS 
TYPE 
JNP 

••TEST 30 

tif; 



^RSHEO 

HFTEST 
3S 

PC,RO£UIY 
STSTNN 

ISffioo, 

(PCH 
1 

SOOMN 

(PC)>,a(PC)> 
1 

,KNUa 
PC,(RO) 



TEST fCXT ore 
TgT iT FIRST PASS 

NODE 



TEST IF H.F. 
m IF NOT 
EXTRA DELAY 



;:z£ro the test number 

IIloop? 
;;YES 

••restore counter 



TYPE -END 
SAVE SPASS Fi 



TYPEOUT 



<is>< 



CLEAR TIC UORLO 
SO. 10 NQNITOR 
SAVE ROOH 
FOR 
ACTU 

;;RETURN 



US 



>/END PASS •/ 

;;NUa CHARACTER STRING 




jJENUa 

Sbegin 

X keyboard octal VALUE LOOP 

««HHHIi«««Mfi«#fM«MMHff«f«ftW«»MfMMfffH« 



0: 



^ 887^ 012536 
1000 007040 000775 



IS: 



m rIIa^^ :DISPlay header 

PC.GETCHR :GET CHAR , 

BR IS : ;BR BAd^ IF NO INPUT 



f1MWEC-ll-0ZVTC-C fIRCYll 

ozvra.pia t3o x 



MQ3 

KEYBMRO OCTM. VRLUt LOOP 




Oil. 
OlbOMS 



134 1 

1% II 

1^ 112737 
17M 







00722H 000040 
040 

045 007240 000000 

046 007242 000000 
0M7 007244 000000 




000040 
011534 



01603b 
016037 



lOS: 
SS: 



6S: 
41: 



HOVB 
NOVO 
BIC 



INC 
HOV 

cm* 

BEQ 

IS 

POD 
NOVO 
HOVB 
BR 

cm 
novB 

NOVB 

BR 

NOVB 

HOVB 

INC 

JSR 

tKER 



OXGl fto^i 

0IG2.(^^2 
•1776qO,RO 

MFCHR.R1 

(RD.ftt 

3i 

{RD* 
SS 

IBFCHRR-BFCHR.RI 
(R1)4,NKER1 
(Rl)-^ HKEAHl 

4S 

R0,t40 
6S 

•100. RO 
ROJ^Hl 
•1%,HKEA1 
41 

•40.NKEA141 

RS^RNSG 
IS 



; TABLE OF DEFINED CHRRflCTERS 

BFCNR: 7 
10 
11 
12 



40 
177 



0 
0 
0 
0 



;0EFINE0 CHRRRCTER EQUIL 

.ftSCII /HT/ 
.flSCII /LF/ 
.ASCII /CR/ 




TO XTRL 

DIGIT 



^ POINTER 



_ = TO VALUE IN TABLE ? 
BR IF FOUND 



NOVE POINTER 
m IF HORE 
BR IF NOT IN LIST 
UPDATE POINTER 
LOAD 1ST CHAR 
LOAD 2m 

TEST IF LESS THAN 40 
BR IF ABOVE 
NAKE PRINTABLE 
SAVE CHAR 

ADD A *V BEFORE CHRRRCTER 



LORD SPACE 



DISPLAY HESSRGE 
LOOP BACK 



CODE 

TAB CODE 



CHARACTER aRG 




CODE 



SPACE CODE 
DELETE CODE 



cS^ LEFT 
H TAB 



n«ifcec-ii-ozvTCHL 

DZVTCC.P13 T30 
1057 007262 051506 

mmm 




107b 007372 000403 



00737M 004537 

007414 014363 
007416 004737 




*32 001* 
007434 




007456 012302 




1101 007472 012702 

Hi. ;:: :. :^ 




npCYU 

X 



N03 

.flSCTI /ES/ 

■m m 

0,0,0,0,0,0,0,0,0,0 



SCO 003S 



001000 

020332 

020314 
001100 
011534 

001000 
011534 

011534 
0116S2 

011534 
011652 

001000 
011534 

011534 
0U6S2 

011534 

011652 

020516 
011534 

011652 




ESCAPE 



001256 



001256 



001256 



.EVEN 
••TEST 31 

•MftffWHHH 
NOV 



IS: 
2S: 

A: 



IS: 
2S: 
B: 

C: 
IS: 



BR 

NOV 
NOV 

NOV 

III 



BR 

NOV 

fKBC 
JSR 



BIT 

HKBD2 

BR 

JSR 

NOV 
JSR 

!^ 

NOV 
JSR 



I wVWWVVV VvwW VW VVwWwinrwwVWWVWw wW VW W 

KEYBOfIRD CHRRACTER TEST 

mt^atMMMMM M MM.MMM M MH.M M M M M.M M. M J». M. 

VWwwWVVVwWWinVwVlrWVVVVwWWVWW 



•|IT09,VT5}0( 

•V52RU,R3 

•VS0RU,R3 
•STg»!sP 
RSfRHSG 

(R3)1.R2 
•BIT04,VT5XX 



RHS6 



2S 

RS,AHS6 



(R3)t.R2 

PC,TSTR0H 

(R3)i.R2„ 
•BITO^fVTSXX 
IS * 
R5,RNSG 

^,flN56 

PC,TSTROH 

(R3)i.R2 
R5,RHSG 

PC.TSTROU 

•R0I6.R2 
RSfRHSG 

PC,TSTROy 



IS UNIT ft VT52? 

YES-SET UP FOR LOWER CASE CHAR. 

NO-SET UP FOR UPPER CASE CHRR. 

DISPLAY HEADER 

LOAD ROW • 
UNIT A VT52? 



PC.TSTROU jcHECK^HE RON 



;LOAO ROU • 
•Im) ROU 

;CHECK 2ND ROU 

iff AVT52? 
;NO-USE UPPER CASE KEYBOARD. 
ISSUE VT52 ROU 3 NESSAGE. 



;CHECK ROU 3 
;LOAD ROU • 

;C»CCK ROU 4 



;CHECK ROU 5 



;TEST THE "LEFT-SHIFT KEY 



OZVTtt.Pli T3i 
1107 







BOH 



SCO OOHO 



01153H 

001000 0012tt 
011S3H 

011591 

liii^ 

011S3H 

001000 00125b 
011534 

01153*t 

m 

011S3H 

001000 0012Sb 
01153>« 

011534 
011652 

010000 00125b 
011534 

021122 
011534 

011534 



0: fS.IMSC 




IS: In S.AHSG 

JSR fSfMSG 
IKBl 

;TEST TIC "RICHT-SHirr KEY 



li: Sr S.ffGO 

IKBl * 

;TEST THE COffTML NODE 

F: J9 R5» 



NOV (R3)i.R2 
g gXT0*.VT5XX 



IS; JsR StflNSC 

pcjSTmu 

;TEST TIC VT50H KEYPfO 

[T ieXTl2.VT5XX 




IKBN 

NOV lR0Ub.R2 

JSR RS.flR^ 

JSR R5,M§G 



{DEPRESS THE lER-SHlFT KEY 



?'1.R2 ;LOM ROW 1 SHIHCD TABLE 



;TEST RQU 1 

jiSEL^TS'sHin KEY 

;SET TIC -RXGHT-SHirr KEY 

;L0« TflBLE POINTER 
•UHIT A VT52? 
|N(HfiE imR CA! 
ISSUEVTS ROUl 



;TE5T TIC RON AMIN WITH Tff RIGHT-SHIFT SET 
;RELEASE SKIH KEY 

:SET CTRL 

;L0AO ROM 1 CTRL TABLE 
;UNIT A VTS2? 



it 



ROHl 



;TEST THE ROM 



IF VTSOH EXTRA KEYPAD 

;L0AO ROM POINTER VALUES 

;ST TOP ROM KEYPAD 
•TEST THAT ROM 

;2f€ ROM KEYPAD TEST 




C04 

PAGE 1-27 



SEO OOHl 




OOlZSb 








R5,M66 



RSf iv66 
PC.TSTROM 



:TCST aO KEYPM) ROM 

TEST am KEYPAD RON 
TELL WOUT MTH ROM 
TEST HTH MM 

VTS2» 

y^^tIll operator alt. keypad test, 
put t»c unit in alt. keypad node, 
load ron pointer values 

aO RON KEYPAD TEST 
TEST at) KEYPAD ROM 

TEST SRD KEYPAD MU 
TELL ABOUT HTH ROU 
TEST HTH ROH 



ROU 

KEYPAD NODE. 



121H 
121S 



;CONPLniaN OF KEYBOARD-KEYPAD TEST 
KRBDON: JSR RS.AHSG ;EMD OF KEYBOARD TEST 

KRBTST :LO0P 

• ■■ ■ ■■■■■MUm i M l M M H i HMMm il l M HWMi i WWH l lH MIM M III MM H H 

fTEST 32 Z KEYBOARD ECHO LOOP 

[ li«ii i a i t»M»»#ii*t «» i H#i iM»W Wi«Mi*«<H i H ii tt««<HHHHtW 

tST32: SCOPE _ 
HKEH 



11 ^^^ml 




IS: 



D04 

IHtMl PME 1-a 
:,GETCMI 



SEO 00H2 



PC.GETCMI iOr CHMMCTER 

n ;LOOP BACK 

;L(MO A SINGLE CHPRRCTER ACROSS T»C SCREEN WIDTH 




FILBFA: 





CHRRRCTER IN T« BUFFER 

eiimcN i^ not conpleted 



;im A INCREMENTING CHARACTER ACROSS TIC SCREEN HIOTH 
;OW.Y HO THRU 177 ARE LEGAL CHRRACTERS 



LIC: 
LICA: 

LICB: 



NOV 
NOV 




8S 



8^ 

;DISPLAY SUROUTINE 

XPRNT: NOV 
XPRNTA: gTB 




SET-UP BUFFER POINTER 
MIOTH 



SET-IP U] 



5TE t 
r FOR 



BRANCH IF NOT 
A LEGAL CHfVmCTER 




NOT COmXTED 



00S737 OlOTSb 





BUFFER POINTER 

sn 



^^g'WoN TRANSNITTER STATUS 



ES^ Foi^ 
R IF NOT 
ET SOFT FLAG 

SOFT FLAG 
CHflR 

INPUT FLAG 

CLEARED 

TEST IF ESC 




I 



miroEC>ii-ozvTc-€ 

D2VTCC.P13 



tMCYil 27(732) 2H-«JG-7b IHzHl PAGE 1-29 



EOH 



17Q6N0 
OlftlO 




OiaiO S2S: 



?5BB?TIKl 
TI«2 

TXNE2 



[fCl 



1 1 i-^i 



1 

jlOTQS 



il 



QOllS SOI: 



0107S0 



001130 US: 



•XOFF.nOOAT 



511: 




SGOOAT 




igoaS^ISdoat 

IHS 

fGOASf^SoDRT 
13S 



OR LOOP EXIT 



OQOir Q1033H 



NOV 
NOV 

lU: OR 



13S: TST 

ASS: NOP 
NOP 
NOP 
NOP 
JNP 



xoffAr 




XPRNTA 



SEO 0OH3 



LOAD 




IF 
•DELAY 



IFINPUT FLAG 



;OELAY 




^, |98U> CHMtCTERS T 



CHAR 
FOR X ON 

•IfART^IN 

test for x off 
IbT if not 

;xoff enabled ? 

X OFF son FLAG 



bPif%ared 

LOAOWPECTED 



IF 




IF NOT 



; IGNORE INPUT CHARACTER 

; UNEXPECTED OR INCORRECT INPUT FLAG 



miNKC-ll-OZVTC-C 



man mmy zh-aub-ts iMtsi 



FOH 

PAGE 1-30 



SEQ OOHH 




)137 



010724 005037 
010730 00507 
OlOTSt Q0S037 




Ii»u 

0106H8 



0107% 



UObH 000170 



m m 




011591 

m 

01253b 

iSi87 

000132 
1777H0 
00110b 
011070 



011070 
011070 



011000 



rr OR STMMO EXIT 
JNP 

;Mim, EXIT 
IS: OR 



LOOP 

M01,FXNDTfl 
IbS 



•pSETUP HESSME 



XOFFOK 
I( 




;EXIT 



LOOP: 0 

XOFFW: 0 

XQFFSC: Q 

flXOFF; Q 

XOFFRC: 0 
XOfffIC: 



:HHEN SET IGMME KEYBOMD aAGS 



OETERNIHE THE TEST TO GO TO 



hflM: 
FXfDOT 



FirOTA: HGl 
JSR 





;E1«I0R ASK AGAIN 



001112 



FfOA 

OSPCH(RO).&PM)A 
aDSPCH(RO) 



FOR NUHBER 

TEST FOR OTHERS 

MKE 0-32 

LORD THAT TEST • 

TEST IF VALID 

;BR IF NOT 



:LOAO LOOP A00RE5S 
;G0 TO tAaT TEST 



OlUOb 003712 



; SUBTEST DISPATCH TABLE 
OSPCH. 

TST3+2 
TSTH+2 
T|^2 

TSTlO+2 



I 




GOH 

mem 27(732) 24-«J6-7b 1H:41 PME 1-31 



TST1H2 
TST12+2 



S£0 0045 



1432 011270 

14S Oil 

142 (11 

1435 Oil 

143b Oil 

1437 011304 
011310 





TST2b*2 
TST27+2 
TST30« 
7ST3H2 

;SUBROUTINE TO LOW COPIER TEST 
FIRLST: 



mvB 



•iSICRO)^ 




IS: 



VHl.R^ 
R2 

•40, (RO)^ 
R2 

•'1 (ffiH 

•:e!(RO)* 



;LOM) WIDTH 



•BR UNTIL OOfC 



;L0RO 80 TH 

IKS™ 



001316 

000015 
112720 000012 

llf " 



;SUBR0UTIfC FOR THE ORTA PATH TEST 

D TPSR: NOV IgUFFP.RO 
DTPSRB: [gV 

NOV 

NOva 

OTPSRA: 




1441 

1442 011312 



100374 

112710 000377 
000205 



012700 024312 




R3 

ai5,(R0)« 
•12.(R0H 

ri,Iqh 

OTPSRA 
•377, (RO) 
RS 



Jb THE MIOTH 
iLOAO 'LF' 



;L0A0 TERN 



{SUBROUTINE TO LOAD BUFFER HITH GRAPHICS CHARACTERS 
GBBUF: NOV ^BUFFER.RO ;LOAD BUFFER ADDRESS 



twirttc-n-ozvTc-c 
DZvTa.Pia 



1444 




011462 
11470 
11474 
11500 

011504 

nisio 

)11S12 
UlSlb 

«}{ 

11 
11 
11 
11532 



J7 
001375 
0 05337 
100372 

m 




mCYll 27(732) 2H-flUG-76 14:41 PME 1-32 



H04 



9E0 00% 



00013b 

000177 
00013b 

000377 



001254 01145b 




010000 lb7450 

0114b0 

0114Sb 




001254 011530 

iir" 

_lll__ 
011532 



011530 



NOV 

my 

If: NOVO 



8^ 



HOVB 
RTS 



•13b.Rl 

Rl|%H 
Rl 

•|77,R1 
•|3b,Rl 

•177, (RO) 
PC 



;PROGf»« OaAY ROUTINE 



DELRY: 


NOV 


SUBTSTilOi 


CLR 


US 




TST 


HFTEST 




Ir 


cS 










ASR 






ASR 


101 




NOP 






NOP 






NOP 






NOP 




21: 


B?T 


•8IT12,aSM 






31 






Hi 




m 

BPL 


!> 


3S: 


NOP 






NOP 






NOP 






RTS 


PC 


lOS: 


2 




US: 


0 





RDOAY: NOV 



2S: 



1 1 1 1 1 1 



1 1 1 1 1 1 



101: 
IIS: 



SUBTST.IOS 

\& 

101 

lis 

2S 

lOS 

2S 



PC 



LORD INITIRL CHRR. 



A CHRR. IN T»C BUFFER 




RT EM) OF ^PHICS STRING? 
^ g^^jpF^K^NSERT TERHINRTOR 



;LORO COUNT 

;TEST IF U.F. NODE 
BR IF NOT 
CHRNGE DELAY TIHER 



;TEST SR 
BR IF SET 
jOELAY 

;OELAY 



;EXIT 



mCYll 27(732) 2H-MJG-7b 14:H1 



104 

PAGE 1-33 



SEQ 0CN7 



1540 




010330 




11S7H 006001 
1157b 

11 " 
11 




1 177770 
0116% 



177770 



0116HH 000000 

8ii^ 888888 



153b 011652 004537 011534 
OllbSb 014074 



011660 004737 01253b 
U1664 000775 
111 




011706 001416 

mi m m 



012244 
167172 




011724 

ii:^ 

1736 
11744 

11750 053737 0122% 

gii^ m 



;mOER SUBROUTINE FOR VT-SO 
M6G: NOV (R5)*J[0S 

IIS: JSR PC.XPRNT 
RTS R5 

;0CTM. - 3 BIT CONVERSION 
OCTAL: 



NOV 
BIC 
WO 
H0V8 
NOV 
ROR 
ROR 
ROR 

^ 

NOVB 
NOV 

S9!- 

ROL 



BIC 



RTS 



RO .Rl 
•lt7770,Rl 
•60.R1 

Rl 
Rl 

Rl,6lGl 

IS'"' 

Rl 

Rl 

•177770,R1 

PC 



: DISPLAY IT 
•EXIT 



;L0A0 Rl 
•NASK 

;SAVE LSD 



'b^er 



;SAVE IT 



;SAVE NSD 
•EXIT 



DIGO: 
ICJ 



8 



; SUBROUTINE FOR T»C KEYBOARD CHARACTER TEST 



TSTRM: JSR RS.AMSG 



; DISPLAY HEADER 



IS: 



NOV SiS^*^ 

hi tBT^.aSHR 



41: 



JSR 
BR 
NOV 

J? 

BEO 

ii? 

BEO 
BIT 
BEO 

Siv 

BIS 



PC.QETCHR 
IS 

I477600,HASK1 



CHAR 

BACK IF NO INPUT 



5S 

iBITO.aSUR 

NffiK^aOOS 

naskiIro 

RO.lOfiS 



TEST SM 

00 NOT TgT PARITY BIT 
ITY 

BR IF NOT FORCED PARITY BIT 
TEST FOR EVEN?OOD PARITY 
BR IF ALLUAYS OFF 

It fxPECTEO 
SET BIT 7 IF EXPECTED 
NASK VALUE READ 
CONPARE CHARS 



miroec-ii-ozvTc-c 

02VTCC.P13 



MCYll 27(738) 2H-flUG*76 IHtHl 



15S5 011766 
ISa 011770 



011774 



001041 
100332 

noS)7 



TST 

8% 



J04 

PAGE 1-34 
(R2H 



SEO 0048 



BR IF NOT EQUAL 
BUHP RS 

: TILL DOME 



;CONE HERE ONLY IF TESTING -PRRITY** OPTION 



1S62 01177b 
1SB3 01( 




012842 
01340 
01S40 

012242 
012240 



5S: 



21S: 



000001 
012242 



012842 



167044 
000200 0122% 
0128% 



CLR 
NOV 

INC 
TSTB 



24S: 



lOlS 

(^.lOOS 

101s 

mn.asm 

MIT7,NASK2 
lOlS 

^T7,NR9(2 



CLEPR TENP 
CLEAR CHAR SAVE 

UPDATE CNT 

TEST E^OOO 

BR IF OPER. SAYS EVEN 

BR IF 000 ALREADY 
sir PARITY BIT 
m TO TEST CHAR 

BR IF EVEN ALREADY 

BR TO TEST CHAR 



;COnE HERE IF EXPECTED NOT EQUAL TO RECVD 
; CONVERT RESULTS TO OCTAL FOR TYPEOUT 



mm 

811644 
116% 
0116S0 
177600 

Qoomo 

000056 
015537 

0122% 

mm 

011644 

811^ I 



jl59l5 



lOS: 



JSR 

HOVB 

HOVB 

HOVB 

BIC 

HOVB 

HOVB 



If*' 




IJ 

015520 



015524 

li 



BIS 
HOVB 




0l60,l1(BQA 



001274 001142 



011534 



m 8i! 

1610 



3S: 



BIC 
HOVB 

JSR 
HKBQ 




LORD OCTAL • 



TEST IF PRINTABLE 
W IFPRINTABLr^ 
CONVERT TO A "i" CHARACTER 
SAVE MAR 
OCT GOOD CHAR 

LOAD DIGIT 



m.NKBQl 

VTIS.STKS 
3S 

RS| ANSG 

4 
IS 



;SAVE CHAR 

; DISPLAY ERROR MESSAGE 

; CHARACTER RECVD NOT EQUAL TO EXPECTED 
•BR BACK AND TEST THE oIaRACTER ¥»IH 



NfllMQCC-ll-OZVTC-C 
0ZVTW.P13 



mCYll 27(732) 2H-MJG-7b 14:41 PME 1-35 



KOH 



SEQ txm 



Ibll Q1224Q 

1U2 012242 

lbl3 012244 

1614 0122% 



177600 





III 





ou_ 

m 

01227b 





0100% 

ir 
1( 
ll 

ihni gggggo 
OlttOS ooooso 

112766 QO00S5 

012709 012%4 

112723 000040 
005002 

016001 012454 

ilf 



116663 000001 
062702 000060 
Q527Q2 000040 



177777 



000010 



8^ 

105726 



lOOf: 
lOlS: 
mSKl: 
mSK2: 



0 
0 

177600 
0 



c wirtfw wlTwWIMnrwwirinMrwi^ 

.SBTTL CONVERT BINMY TO OCCirM. AND TYPE ROUTINE 

;:PUT THE BlfMRY NUNBER ON THE STACK 
;;G0 TO T»C ROUTINE 



;0EPLK£D WITH 
fCAJ.: 
;« NOV 
;» TYPOS 

fTYPOS: 



IS: 

2S: 
3S: 

4S: 
5S: 



6S: 
7S: 



NUH,-(SP) 



RO,-CSP) 

ral-(SP) 

S^O?-(SP) 
20(SP) R5 

t'-.KSP) 
%eL!(.R3 
R2 

S0TBL(R0),R1 
Rl.RS 




(! 
6S 

1(SP).-1(R3) 

•;o,R^ 

82.{S)« 
(R6)i 
LllO 



BS: 




PUSH RO ON STACK 
ON STAOC 

ON |ta(S( 

ON STACK 




ACK 

smitS mo sign 

get t)c input nutoer 

nrke tic ascii nmer fcg. 




_T T« CONSTANT 
FORN THIS BCD DIGIT 

INCRElS%€ BCD DIGIT BY 1 

FALL THROUGH IF 0 
|Tia ^N6 LEADING O'S? 

HSOf 

THE SIGN 
NAKE THE BCD DIGIT ASCII 

JUST INCRENENTING 

GO TO EXIT 

^^CHANck^O ASCII 

US THE LSD THE FIRST NON-ZERO? 



L04 



PME 1-36 



SEO OOSO 




40 



177777 17777b 



12464 



000004 



012701 000106 

m 

12737 000001 
001370 



012534 
0107% 



01253b 013737 0012S IftlO 
012544 




U2bQ2 1003b2 
llbOb 000207 



012bl2 
012blO 



b4e 012bl0 
b4S 012612 



1 1 1 1 1 1 



• Mill 



Q12bl4 012500 

654 012616 012701 024312 
~ 0126S 112021 



BPL 



IDTBL: 



HOV 
NOV 

nov 

TYPE 

nov 
nov 

loioo. 

1000. 
100. 
10. 
.BLKU 



-li^),-2(R3) 

2)+ Rl 
gi+'RO 

^(SP},4(SP) 
(SP)4|(SP) 



BR IF NO 

T 




FOR TYPING 



StftCK IHTO 

pS ItSSc IntS rI 

POP STACK INTO g 

n8& Iyp^the NUNBER 

flOJUST THE STACK 
RETURN TO USER 



SOBLK 

; SUBROUTINE TO FILL THE SCREEN UITH AN CHARACTER 
FILLHC: NOV 



••E.Rl 
PC^fl 



IS: 



NOV 



RTS 
0 



•l.MFFOK 

IS 

PC 



101: 

iSUBROUTINE TO GET A CHRRACTER FROM THE VT50 



;L0A0 CHARACTER BYTE _ 
LOAD THE Lire UITH CHAR 

•LCW) coDnt 

INSURE XOFF/XON CONTROL. 
•OISPLAY THE LINE 

;LOOP UNTIL DONE 
•EXIT 



GCTCHR: NOV 
CLR 



IS: 



TIHEl: 
TIHE2: 



TSTB 

BPL 

NOV 

ADD 

RTS 

DEC 

SI 

BPL 

ERROR 

RTS 

0 
0 



TIHEOJINEl 
TINE2 

avTis 



«, 

IS 

2 

PC 



ICl 



;L0AO TINE COUNTER 



TEST INPUT STATUS 
n IF CLEARED 
mo A CHAR 
g^TE RETURN 

DELAY 
FINI9C0 ? 

LOOP Tia TINE EXPIgD,_ 
NO INPUT FLAG FRON DEVICE 
EXIT 



;HOVE TO THE OUTPUT BUFFER 

NTOB: NOV 
HOV 
IS; HOVB 



(R5)^.R0 
•BUFFDt.Rl 
(R0)4,(R1)-^ 



;L0A0 OEST. 
LOAD Rl 
LOAD BYTE 



PME 1-37 



MOH 



SEO 0051 



IttH 



IttS 
Ibtt 

1667 
1668 
1669 



1670 




1271 
lf?71 

l&S 
12731 



i131l 
13121 
1131c 



lOH 
103 

I if 



126 
126 




12716 QH1S16 
U72H 0521^ 




4H0 
05 0H052H 
OS 042524 
15 000 
12 0430H0 H91: 
0415^ 
047440 
080105 

IIS 006605 

012 042040 rrc: 

101 0'«520 



i iKir"- 

.S8TTL ASCII ICSSMES 
;A6CII HESSMES 

1 TITLE: .ASCIZ <lS><15><12>\miN0EC-ll-OZVTC-C VTSOA, B. VTSQH flfC VTS2 ACCEPTANCE TEST 
5 



.ASCIZ < 15X12)/ FULL SCREEN OF TIC CHARACTER E/<1S><12><377> 



05 




0621 

8lo^^ 



WO: 



105 



^7522 fW: 



3516 

013104 050040 (E2101 04S24 
013112 047122 0S440 177412 



.ASCIZ <1S><12>/ DATA PATH TEST /<15><12><377> 

.ASCIZ <1S><12>/ SINGLE CHARACTER PER LINE /<15><12><377> 

.ASCIZ <15><12>/ ROTATING PAHERN /<15><12><377> 

.ASCIZ <15><12>/ CURSOR NOTION TEST /<15><12><377> 

.ASCIZ <15><12>/ TAB, BACKSPACE AND BELL TEST /<15><12><377> 



1131 
13154 
131^ 
13170 
I13i?b 

il §12 052 

I1S20 000377 

11^ QK015 020040 051105 N910; .ASCIZ <15><12>/ ERASE LINE TEST /<15><12><377> 

01^ S1501 ffiOlOS 0H4514 

U3236 942516 ^040 (S1S05 

013244 020124 006440 177412 



ns 

061125 



13134 047S15 





12 041440 
020122 
047117 
020124 



04(S24 N97: 
026102 041040 041501 
:: 042503 
116 041040 
14 042524 
006015 




1671 
1672 
1673 



27(732) 



167H 



1675 



1676 



1677 



1678 



1679 





i6n 





main 

177M12 

0H14HO 
020122 
042515 
177412 

042040 

052123 

044040 
11523 
»440 



051107 
051503 



047503 
0421 



_ 117 

. 042524 052123 

|a|4^ QO^g 

ISs mml 

iSbO 047503 062116 

13666 046114 051105 

74 042117 0201f 

02 042524 

ii •'1 






__jit_ 

005015 

^ii 

047522 
046440 
047106 
006504 

060112 
040440 



N04 

24-MI6-76 14:41 PAGE 1-30 SEO 0052 

mil: .ASCIZ <15><12>/ EMISE SCREEN TEST /<15><12><377> 

mi2: .flSCIZ <1S><12>/ VIOEO COUPLING TEST /<15><12><377> 

H914: .flSCIZ <33><110><33><112><15><12>/ TERHINM. IDENTIFIER TEST /<15><12><377> 



N920: .ASCIZ <15><12>/ COPIER PERinETER/<15><12><377> 



NS21: .ASCIZ <1S><12>/ DISCLAIMER STATEHENT/<15><12><377> 



n922! .ASCIZ < 15X12)/ HOLD SCREEN NODE TEST/<15><12><377> 



H9221: .ASCIZ <15><12>/ GRAPHICS HOOE AND REV. LINE FEED TEST/<15><12><377> 



n923: .A6CIZ <33>< 137X33X1 10X33X1 12>/ AUTO COPY NODE TEST/< 15X12x377) 



HPTCNT: .ASCIZ <33>< 110X33X1 12) /PRINTER CONTROLLER NODE ENTERE0/< 15x12x377) 



NPTSCN: .ASCIZ <33x 110x33X1 12) /PRINT A SCREEN OF E'5/< 15X12x377) 



mCYll 27(732) 24-«JG-7b IHtHl PME l-» 



BOS 



SEQ 0053 



1681 



IMP* 



1687 




.ASCXZ <110><33><112>/ 8UT0 PRINT HOOC TCST/<1S><12><377> 



NKB: .ASCII <1S><12>/ KEYBOMO CHMMCTER TCST/<1S><12> 



ftai: .A6CIZ /fCLEnSE THE "SHIFT KEY/<1S><12><377> 



fKB8: .8SCIZ <15><12>/LEn TO RIGHT IN A ROM, DEPRESS OTC KEY AT A TIIC/<1S><12><377> 



HKB8: .ASCII <1S><12> /STARTING HITH TME TOP ROM EXCEPT T)C THIRD/ 



.A6CIZ / FRON RIGHT END AM) LAST KEY5/<15><12><377> 



.ASCIZ <iS><12>/rARTIN6 HITH TIC TOP ROU EXCEPT T)C LAST KEY/<15><12><377> 



HK8C: .ASCIZ <15><12>/START UlTH T»C SECOND R0U/<15><12><377> 



cos 



lfc« 




27(732) 24-AUfi-7b lH:Hi PAGE i-HO 



NKBD: .ASCII <15><i2>/STRIIT UI7H TIC THIRD MM EXCEPT THE CTH./ 



SEO 006H 



iU3 



16% 



.nCIZ <1S><12>/ AND TIC "BLANT KEYS/<1S><12><377> 



.ASCIZ <15><12>/START WITH TIC THIRD ROH ,BE6IN ROM UITH "AT KEY/<iS><12>077> 



IKBE: .ASCII <1S><12>/START UITH TIC FOURTH ROM EXCEPT TIC SCROLU 



.ASCIZ <15><12>/,SHin, REPEAT AND AUT0-PRINT/<15><12><377> 



HKBF: .ASCIZ <15><12>/START UITH TIC FIFTH R0U/<lS><12><a77> 



HOC: .RSCII <15><12>/N0U HOLD DONN TIC "LER-SHIFr KEY/<iS><i2><377> 



IS MTSlb K(U27 fKBQA: .ASCII <15><12>/N0U HOLD OQItf TIC "RIGHT-SHIFr KEY/<i5><i2><377> 



DOS 




27(732) 2H-AJG-76 IH-.H! MGE 



27 HON: .ASCII <15><12>/N0N HOLD OQNN TNE "CTH** KEY/<iS><12><377> 



NKBI: .ASCII <1S><12>/START HITN T)C TOP WM/<15><i2><377> 



1101 fKB7: .ASCII <15><12>/START HITH TIC ZTO R0M/<15><12><377> 



NKBC: .ASCII <1S><12>/START HITN THE 3R0 A0II/<1S><12><377> 



nOL; .ASCII <15><12>/START HITH TIC HTH R0U/aS><12><377> 



1101 fKBH: .ASCII < 15><12> /START HITH TNE LAST A0ll/<1S><12><377> 



IKBN: .ASCII <15><12><12>/VTSQH KEYPAD TEST/<15><12><377> 



IKB52: .ASCII <15><12>/VTS2 ALTEANATE KEYPAD NQOC TEST/<15><12><377> 



ONO ONO 
OHO 

042101 036HM0 



.ASCII <1S><12>/CHARACTER HAS IN EAR0R/<15><12> 

.ASCII /fiOOD s / 

.BYTE HO.HO.TS.HO 

.BYTE HO,HO,HO,>IO,HO 

.ASCII /BAD « / 



EOS 

NRirCCC-ll-OZVTC-€ JWCYll 27(732) 2H-AJ6-7b 14;M1 PME l•^H^ 
0ZVTCC.P13 ASCII ICSSMES 



SCO OOft 



1710 
1711 

1712 



1713 
171H 



1717 
1718 



1719 
1720 
1721 
1722 

1723 

172H 
1725 




040 075 NKBQ2: .BTTC H0,H0,75,M0 
^ HKBQB; .BYTE 40,40,10,15,12,377,0 

.flSCIZ <15><12>/XEYB0M0 CHRfMCTER TEST C(mETE/<15><12>(377> 



la CRLF: 

8ii 



.ASCII < 15X12)/ KEYBOARD ASCII AND OCTAL LO0P/<15><12> 



A KEY IS OEPAESSO), THE ASCII CHARACTER AfO/ 



.BYTE 15.12 

.ASCIZ / tic TWEE DIGIT OCTAL CODE UIU BE ECHOED/ 



.BYTE 15,12,377,0 

.ASCII <15><12>/CHAR « / 

.BYTE 40,40,40,75,40 

.BYTE 40,40,40,15,12,377,0 

.ASCIZ < 15> < 12>/KEYB0ARD ECHO L00P/< 15> < 12> 

.BYTE 15,12,12,12,12,12,12,12,12 

.BYTE 12,12,12,12,12,377,0 



F05 

27(732) 2H-MJG-76 iM:Hl PAGE i->t3 



1728 



1729 



1730 



1731 



173H 
1735 



173b 
1737 




;HO>g_ flW) ERASE SCREEN OPCODE 
kmSi .BYTE 33, n0|33iin^. 377,0 

PRTH; .ASCII <15><12>/T 9 8 888889888982 8 889829889888 88 8 9 3998839 ^ 



.ASCII / aaaaa9899a 9 a99999 9 99 9 9999aaa9988a9a9 9 a t/ 



.ASCII <15><12>/T ^^^^F^n'FF^FFFfcH:tyl^^^^FF^'FF^^FFFFFFr / 



.ASCII / ffllstF^FFFIFF^^^f^FF^FFF^FF^F^^^FFFFFF T/ 



VT50A: :SSl ^{<l2>/TESTIf4G VT50A (12 LIIC5-4I0 COPIER)/ 



.BYTE 15,12,12,377,0,0 
VT50B: .ASCII <15><12> /TESTING VT5QB (12 LINES-COPIER)/ 



.BYTE 15,12,12,377,0,0 
VT55: .ASCII <15><12> /TESTING VT55 (24 LINES-COPIER)/ 



SEO 0057 



1738 
1739 



17H0 
17H1 



17H3 



17HH 
17H5 



17% 
17M7 
ITHS 



1749 




G05 

?H«JG>76 lH:m PME 1-HH 

.BYTE 15,12,12,377,0,0 
VT5QH: .ASCII <15><12>/TESTIN6 VTSOH (12 LIICS-COPIER-O.C.A.)/ 



SCO 0058 



.BYTE 15,12,12,377,0,0 
VT52K: .ASCII <15><12>/TESTIN6 VT52 (24 LirCS-NO COPIER OA PAINTER/ 



.BYTE 15,12.12,377,0,0 
VT52L: .ASCII <1S><12> /TESTING VT52 (24 LINES, C0PIERH40 PRINTER)/ 



.BYTE 15,12,12,377.0,0 
VT52n: .ASCII <15><12>/TESTIN6 VT52 (24 LINES, PRINTER-NO COPIER)/ 



J171 

01717b _ 
017204 062123 



.BYTE 15,12,12,377,0,0 
.BYTE 33,132,377,0,0 

.ASCIZ <33><134><33><137><15><12><12>/L00P ON TEST PATTERN LETTER (A THRU Z) ? 



.ASCIZ <33><134><33><137><15><12><12>/START AT TEST PATTERN LETTER (A TI«U Z) ? 



052101 



27(732) 



17S0 
1751 



1752 

1753 

175H 
1755 



175b 



1757 



1758 



1759 




000 
020040 



H05 

2>HU6-76 m:Hl PAGE 1-HS 



NQ2; .ASCXZ <15><12><12>/TRY MAIN /<15><12><377> 

QOPRNT: .BYTE 33,135,12,12,0,0,0,0,0,0»0,0,0,0,0,0,0,0,0,0377,0,0 



QOHDSC: .flSCIZ <33><133><15><12> /TESTING SILO REG/<377> 

GOOSHS; .flSCIZ <33><134><15><12>/SXL0 TEST D0NE/<15><12><377> 

GOAPK): .BYTE 33,13b,377,0,0 

GONflPH: .BYTE 33»137,15,12.12,12,0,0,0,0,0,0,0,0,0,0»0,0,377,0,0,0,0 



mS: .A5CIZ <33><110><33><112>/ DIRECT CURSOR ROORESSING TEST/<377> 



UHRTO: .flSCIZ <15><12><12> /FIRST LIIC DEVICE ADDRESS ? s /<200> 



UHRTl; .flSCIZ <15><12><12>/LRST LINE DEVICE ADDRESS (CR IF NOTC) ? s /<200> 



SEO 005<) 



PASHED: .ASCIZ <15><12>/ 



PASS I I OF ERRORS / 



1760 



1761 
1762 
1763 

176H 

1766 
1766 



1767 



(SOOMO 



1770 




H QOllS 
lni322 



001244 001250 DTI: 

001244 001^ 0T3: 
001324 000000 



lOS 

14:41 PME 1 % 



SEO 0060 



.flSCIZ /CmOR FLAG SET ON TfVWSHITTCR STATUS/ 

.ASCIZ /NO INPUT FLAG DETECTED/ 

.ASCIZ /INCORRECT I.D. CODE/ 

.ASCIZ /UNEXPECTED OR INCORRECT imiT CHAR/ 

.ASCIZ /INVALID BUSS ADDRESS, TRY AGAIN/ 

.ASCIZ /ERRPC VTNOU TSTNUH/ 

.ASCIZ /ERRPC VTNOU 1ST HD 2MD UD 3RD UO/ 

.ASCIZ /ERRPC VTNOU TSTNUN EXPCT RECV/ 



.EVEN 

SERRPC,VTNOU,TSTNUH,0 
SERRPC,VTN0U,SAVE4,SAVE2,SAVE3.0 



r«IN0EC-U-O2VTC:C nflCYll 27(732J ZH-flUe-TS 14:41 PAGE 1-47 
0ZVTCC.P13 ASCII HEf 



JOS 



1^1 geoaOP OOllS 001244 gOiaO DT4: KmPC.VTNOU^TSTNUN.fGOOAT.iaOOAT.O 

08030b 0011» 001138 000000 

\m .SBTTL KEYBOfM) CNRRRCTER CODE TMLES 

1774 

1775 ;TNE ACTURL KEYBOARD LAYOUT IS REQUIRED 

177^ (0814 (msg BSMm 020442 VSORU: R0Hl,R0ie,R0U3,R0U4,R0UlS,R0UlS,R0UlC 
^7M QeObTS 

1778 020338 080520 02qStt 080614 V52RU: R0U12,ROU22,ROH38,R0U42,ROH18S,ROU18S,ROU18C 



m m 



020725 020725 



SEA 0051 



M 1 1*5: 



1782 

1783 
1784 






ROUl: .UORD 33.51,52,63,54,65,55,57,70,71,60,55,75,100010 



^11 ISnil 000127 R0U2: .UORD 11.121.127,105,122,124,131,125,111,117,120,133,134,12,100177 

12 0001^ QOOlg 000124 

rail R0H3: .UORD 101,123,104,106,107,110,112,113,114,73,47,100015 

000105 000107 000110 

0204S5 gOOUg 000113 000114 

000073 000047 100015 

" R0U4: .UORD 132,130,103,125,102,115,115,54,55,100057 





14 II 

15 1 





1788 080620 



1789 




020664 



020505 
17S0 020514 



1791 
17« 





0Q0K4 



KEySSSrS EQUIVALENCESdONER CASE CHAR.) 
R0U12: .UORD 33,51,62,63,64,65,66,67,70,71,50,55,75,140,100010 



11 006151 000157 R0U22: .UORD 11,161,167,145,152,154,171,165,151,157,160,133,134,12,100177 
145 J00152 OOOlf" 




QuuubQ 0QQQ5 

5d140 lOOOl 
000151 

lit 100 

000141 000153 000 

M IP ^ 

Togm 000047 ooo 

100015 



44 R0U32: .UORD 141,153,144,146,147,150,152,153,154,73,47,173,100015 



000173 



U72 000170 000143 R0U42! .UORD 172,170,143,166,142,155,155,54,55,100057 



: SHIFTED RON COOES 

ROUIS: .UORO 33,41, lQ0,H3,44,>l5,ia6,%.S2,SQ,51, 137,53, 100010 




ISS 0210b3 

"iir 



1807 



jlOTS 
1810 ^11^ 

U107 

hii7 



1811 
1812 

1813 
1815 

P. 

m 

1880 
1821 



SO 

OQOJ 


1 


• III 

• • « 
MM 


♦ • • 
« • ' 

KK 





000043 
000^ 



1 1 1 1-" 



I I I l-X 





I I I tKK 



000021 

& QQQ^ QQQffiH QQQOg 

000 000026 SsSz 005^ 

mmSo 000015 



000137 

OOOlOg R0H12S: .WORD 33,H1,100,H3,>H,HS,136,%,52,50,S1, 137,53, 17&, 100010 



;CONTROL ROU COOES 

ROHIC; .UORD 33,21,22,23,24,25,2b,27,X,31,20,15,35,100010 




10 



I I I i-v. 



I II IC I 



I M l<CC 



I I I l-JC 



1 1 1 i':.:wi 1 1 i-j^mt I M>c I 



i 1 1 iiclHi I i I*:*! 



1 gOOg R0H12C: .UORD 33,21,22,23,24,25,2b,27,a,31,20, 15,35,0, 100010 



000035 000000 



lOQoio 



033 



033 



075 



105 



>1 



0Q012Q 



I I I ICC 



I i I Ifil 



iii^ 000057 

jii^ 8888^ o88ob5 000056 
!llb2 000033 100103 





;VT52 


ESCAPE SEQUENCES 




REVLF: 


.BVTE 


33,111,015,377,0 


;REVERSE LINE FEED. 


ENPKP: 


.BYTE 


33,075,377,0,0 


;ENR8LE ALTERNATE KEYPAD HOOE. 


EXAKP: 


.BYTE 


33,076,377,0,0 


;EXIT ALTERNATE KEYPAD NODE 


ENGRRF: 


.BYTE 


33.106,377,0,0 


; ENTER GRAPHICS HOOE. 


EXGRflF: 


.BYTE 


33,107,377,0,0 


;EXIT GRAPHICS HOOE. 


ENPNTH: 


.BYTE 


33,127,377,0,0 


;ENABLE PRINTER CONTROLLER HOOE. 


EXPNTH; 


.BYTE 


33,130,377,0,0 


{DISABLE PRINTER CONTROLLER HOOE. 


;VT50-H 


KEYPAD COOES 




ROUb! 


m 


33, *P,33, '0,33, 'R,33,100101 


II0U7: 


.UORO 


67,70,71,33,100102 




R0U8: 


.WORD 


64,65,66,33,100103 





SEQ 0062 



L05 




IBSb 
1827 



1889 



18» 



1831 




76 14:41 PAGE 1-49 
OOOObS ROW: .HORD 61,62,63,33.100104 



SEO 0063 



oooTS 

^ ^77 000167 R0U7A: .WORD 33,'?,167,33,'?,170.33,'?,171,33,100102 

U64 R0U8R: .WORD 33,'?, 164.33/?,165,33,*T, 166.33,100103 

000161 ROMR; .UORO 33,'?, 161, 33,'?, 162, 33, '7,163,33,100104 
77 000162 
77 000163 



£ ROHIOA: .UORO 33,'?, 160, 33,'?, 156, 33,'?, 1001 15 
ll 044510 HTEXTO: .RSCXZ <15><12><12>/THIS SOFTMRE IS FURNISHED TO PURCHASER UNDER R LICENSE FOR 




NTEXTl; .flSCIZ <15><12>/0N R SINGLE COHPUTER SYSTEN AND CRN BE COPIED (WITH INCLUSION/< 



21S OSllS (B1440 

1531 042524 020115 

__5ll7 0»^11 020104 

536 053450 052111 020110 

544 047111 0%103 051525 

°^1U iwil 02QlS riTEXT2: .flSCIZ <15><12>/0F DEC'S COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEN, EXCEPT/ 

042504 023503 020lS 

Q475m K4S20 044522 

044107 (£0124 04751 6 

044524 042503 020051 

614 Q47117 064514 043040 

" 1117 052440 O^Sa 

044im K1440 oilHl 

. 0M2524 (£6115 042440 

652 0SI530 050105 177524 
660 000 



HftlNOIC-ll-OTVTC-C HflCYll 27(732) 2H-flUC-7b 14:H1 PflGE 1-50 
iS32 



M05 



SEQ 006H 



i! 



1635 



183b 



1837 



1838 




123 NTEXT3: .ASCIZ <15><12>/flS HAY OTHERWISE 
17 



PROVIDED IN HRITING 8Y 0EC./<377> 



NTEXTH: .RSCIZ <15><12><12>/THE irFORHATION IN THIS OOCUHENT IS SUBJECT TO CHMttE HITHO 



NTEXT5: .ASCIZ <15><12> /NOTICE RND SHOULD NOT BE CONSTRUED AS A^COmiTNENT BY DI6ITRL/< 



.1 HTEXT6: .ASCIZ <15><12>/EaUIPHENT CORPORATION. /<377> 
lb 



0201(S 
051 117 
Q%105 OHKU 
0MM514 09624 



1440 04311 

KQ105 047117 

. reggl 050111 

15 regUb 053440 

044510 Q441CB 044440 

344 020123 047515 020124 

" 052^3 050120 044514 



mZSBH NTEXT7: .ASCIZ <1S><12><12>/0EC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF 



NTEXT8: .ASCII <15><12>/ITS SOFTWARE ON EQUIPNENT HHICH IS NOT SUPPLIED BY DEC./ 



PAGE 1-51 



N05 



SEQ 0065 




020131 
377 



000002 



000004 
022S40 



M lfMltMMMMMM.MM.MMMM.MM 
vwwwwwwwvwwvwwvwwv 



.BYTE 15,12,377,0 
.EVEN 

p WVwwW VVVVVWVWwVWVWVWVinTWWini 

.SBTTL TTY INPUT ROUTIfC 

;«THIS ROUTINE HILL INPUT A SINGLE CHRRACTER FROM THE HY 
;«CflLL: 

ft mOM rtl'fijLA SINGLE CHMRCTER FROM THE TTY 
RCTURN HERE C»«RRCTER ISON 



THE STACK 



IS: 



NOV 
HOV^ 

NQVB 
BIC 
RTI 



(SP),-(SP) 
4(SP),2(SP) 




aSTKB/i(SP) 
•tC<1^7>,H(SP) 



;;PUSH DOWN THE PC 
SAVE TtC PS 

A CHARACTER 
SAO THE TTY 
St RIO OF JUNK IF ANY 



,.G0 BACK TO USER 
I f THIS ROUTINE UIU INPUT A STRING FROH THE TTY 
.••CflLLs . INPUT A STRING FRON T»C TTY 

|j?BS^TS Sllf B™P0F«!iL^.r ™^ ''"^ 



ROLIN 

RETURN HERE 



SVLIN: 

Hi 



45: 
35: 



5TTYIN! 



NOV 
NOV 
CHP 

SiCHR 

NOVB 

CHPB 

^ 

BR 
NOVB 
TYPE 
CHPB 

SSb 

TYPE 
NOV 
NOV 
NOV 
NOV 
RTI 
.BYTE 
•8YTE 
.BLKB 



StTYIN46.,R3 
45 

(SPH.(R3) 
•177, {R3) 

(R3),9S 
&p,(R3H 

lSP)*,W 
(SP),-(SP) 
4(SPK2(SP) 
HTTy1n,4(SP) 

0 

I 



;;SAVE 
1 1^1 




CHARACTER FROH THE TTY 



JSS 
FULL? 

I-St CHARACI 
ilg IT AHUBOUT 

IIclear the buffer and loop 

I -ECHO THE character 

;;CHECK FOR RETURN 
LOOP IF NOT RETURN 
CLEAR RETURN (THE 15) 
TYPE A LINE FEED 



r f 



THE STACK AND PUT ADDRESS OF THE 
FIRST ASCII CHARACTEToN IT 



S^SSgE for ASCII CHAR. TO TYPE 
TERHINATOR 

RESERVE 8 BYTES FOR UY INPUT 



; ft Wftftftftftftftftftftifftftftftftftft ■ i I ■ ■ ■ M ft t if fftftftftftWftftftftftf ftftftftftftftftftftftftftft 

.SBTTL READ AN OCTAL NUNBER FRON THE TTY 



BOb 



SOOOM 



(1) 
(1) 



■ 



(1) 

<P 
(I) 

(1) 

(i) 
(1) 
(1) 

(!) 
(1) 
(1) 
(1) 
(1) 

<!> 

(I) 
(1) 
(1) 
(1) 
<i) 

(3) 
(3) 
(3) 

(!) 
(1) 
(1) 
(1) 
(1) 
(1) 



Q0Q06O 
000067 



177770 



iiQii 




OOliW 
010742 




muTirc uiu^HEAo m octhl (AScid nuoer fmh tic tty fvo 

ICTVPED. TNEIfjuMSTOMIN^ BY T% 




MDOCT; 




(g»),-(SP) 



N0,-(9) 



(SP) 



) 






ON TOP OF THE STACK 
IN 94I0CT 



PlgV|DE^ ^«CE FOR T« 




MMEH 
RO Jt STACK 
Rl ON STACK 
R2 ON STACK 



: • » ; x-v 



CMRACTER 



SiD SSvt IT 

CLMT DATA UQRO 




IP THE ASCII JlIK 
IN THIS DIGIT 

I^TpHgATy FRQH STACK 





. PARTIAL FRON STACK 

A TERhInATOR 

UP THRU THE BAD C i^. 




LOOP 
LOOP ON TEST 



COb 

1-53 




SOTTL SCOPE HRNOLER ROtfTDC 



[4«1 





LMP S tot IN SHR<7:0> 
;;SCQPCsXOT 

;Mtig TflKT OF c8e FOR TIC XOR tt^MMI 
tXTSTR: flR 

NOV atflMVEC.-(SP) 




ISblOO 
001106 



U:;tm 




fOygE XORj 



isu% Km 



NOV 
CLNB 



s !sy 





oT-NorcNO&jO) 
TIC Eim \c(Tm 



VECTOR 

ft TINE OUT 
TEST 

K. TEST? 
[fiHT TEST* SUR<7:0> 



{ ■■■■■■■■■■ ■ ■■ ■ ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ ■ ■■■■■ ■ ■■■■ ■ ■I 
.SBTTL EUNM MHDLCR ROUTINE 



001250 





ilTCH OPtlOIC PRODDED BY THIS ROUTINE ME; 
INHIB^ S& TYPEOUTS 

;:ERRQRbENT M) N«IR0R ITER NUNBER 



F8''^ ;;SETT»C|RRORFU« 
HOON'T LETric FLAG GO TO 



ZERO 



ISUlb NOV 



DOb 

PME 1-54 



(1) 
(1) 
(1) 

(2) 
(|) 
(2) 
(1) 
(1) 
(1) 
(1) 




,a>XSPLilY ;; 

ft 




001115 



001120 



023172 0137% 001122 




mm 





•» 






MC EMM FLAG 
OF CNIOR INmJCTXON 
\lVEJEmm XTEN COOC 

si 

EiM)R NOUTIfC 



RTI jjBETURN 
{ ■■■■■■ ■ ■■■■■■■■■■■■ ■ ■■■■■■■■■■■■■■■■ ■ ■■■■■■■■■■■■■■■■■■■■■M I MII 

.SBTTL ERROR ICSSME TYPEOUT ROUTIIC 

•mmm& wmm s 



w: 



KRRTYP: 



nov 





a«ITEI«.RO 
IS 



IS: 



4S! 
SS: 




TIC ERROR. 

[ME RETWr I -LIIC FEEDT 
^ICKUP TME ITER INDEX 

fOR TYPEOUT 

RSCIKflU. DIGITS) 

fiSEX SO THAT IT HILL 
FORTHE ERROR TABLE 



POINTER 
NTER 



(i^RTB), 





-DATA I 

-ISrrii 

MCWjf 
^STORE RO 



POINTEfr 



rfSur POINTER 

DATA 



miNKC-H-OZVTC^C 
02VTCC.P13 EW 



EOb 

NRCYll 27(732) 2H-«JG-76 1H:M1 MOE 1-S5 
ICSSME TYPEOUT MUTIIC 



SEQ 00b9 




0130% 












000 



0011S5 



000011 

@iE 



TYPE 
RT5 



-OMRIME RETURN- t "LIlC FEEDT 
RETURN 




(RO)* FOR 
E SWTHER ' 
^t!8(2) 




OMITS) 



NOV a(RO)«,-(SP) 
TYPOC 

TST (RO) 

■ ■ ■■ ■ ■■■ ■■ ■■■ ■ ■■■ ■ ■■■■■■■■■■■■■ ■■ ■■■■■■■■■■■■■ ■ ■■■■■■■■m i MiiiM 

.SBTTL TYPE ROUTINE 

•NOTES 
« 

iCRLL* 

•1) U§IN6 A TRRP INSTRUCTION 
« TYPE 
«0R 
f 
1 

«2) USIl 
i 
f 
ff 




_ LLS CONTRINS THE _ 

SFILLC CONTAINS THE CHRRRCTER TO Fia RFTER. 




C»Mt«TER. 
IRED. 



RBROOR 
STYPE: TSTB 

Slt 

BR 



fSSoR 



TIQN 



;;HESROR IS FIRST ROORESS OF RN RSCIZ STRIN6 



STATUS am ON THE STACK 



STPFLG 
It 



HQVB 



(RO)«,-(SP) 



4t: 




•THT,(SP) 
^CRLF,(SP) 

j,-(SP) 
PC STYPE 





n. 



rYPEC 



A TERNINRL? 
IF NO TERNINAL 

rS&CSS of ASCIZ STRING 

IF TIRHINATOR POP IT OFF THE S 
RE^ PC 
IF <HT> 
BRANCH IF NOT <CRLF> 



0 STACK 
STACK 



02VTS.P13 



( 

(1) 
(1) 
(1) 
(1) 

(I) 
(1) 
(1) 
(1) 
(1) 
(1) 
(1) 
(1) 
(1) 

<P 
(1) 
(1) 
(1) 
(1) 



HACYll 27(732) 
TYPE ROUTItC 



001191 



10 O „ 
112 0137% 001152 




F0& 

2H-flUC-76 1H:H1 PMC 1-Sb 

U: gn gZUX,(SP)4 

NOV MJa,-(SP) 
71: OEOB KSP) 

I 7S 
;H0RIZ0NTflL TAB PROC ES SOR 
8S: NOVO IHO^C^ 

STYPEC: nJB 3STPS 



SEO 0070 



CHRRS.? 




000012 000002 IS: 




.>(SP),aSTPB 
•15,2lSP) 




|12J(SP) 

ITYPEX: RTS PC 
a EQUATES 



~ ^ FILLgTcHflRS. rCEDED 



A Nulit^NSrtO BE TYPED? 
|rWh-Q0 POP TK rUi. OFF OF STACK 

. HOT A COUNT 

LOOP 



REPLACE TAB WITH SPACE 



IS READY 



LOAD CHAR TO BE TYPED INTO DATA REG. 
BRANCH IF 
NOT <CR> 




SficH IF 

<LF> 



' ■■■■■■■■■MHIMM i mMMIMMMMMBMI i MMMHIM M MHHmmMMMHMimMMM 

.SBTTL BINARY TO OCTAL (ASCII) AND TYPE 




;»THIS ROUTINE IS 
•OCTAL (ASCII) r 
IgTYPOS — ENTER 

!• ' NOV NUN,-(SP) 

11 

••STYPON ENTER I 

Ij^TYPOS OR STYPOC 

j« ' NOV NUH,-(SP) 
|« TYPON 
:« 



to change a 16-bit binary nunber to a b-oigit 
tosetup^suppress zeros ahd nunber of digits to type 
;nunber tc be typed 

1^^^ foE^mSSber of digits to type 
to type out with t)c sate parameters as the last 

;;NUnBER TO BE TYPED 
jjCAa FOR TYPEOUT 



GOb 

MGE 1-57 



;iJTYPOC — ENTER HERE FOR TYPEOUT OF A 16 BIT IfJHBER 



SEO 0071 




;t NOV 
;t TYPOC 

STYPOS: 



023754 




STYPOC: 

ITYPON: N^ 

NOV 
NOV 
NOVB 
NEC 

NOVO 
NOVO 
NOV 

IS: Sbl 

a: Sl 

ROL 
ROL 

ai, IK! 

DECS 





Hi: 


ill! . I^^H 


gowj 


SS: 






00754 


7S: 



6S: 



000002 000004 




SOCNT: !j 
lOFILL: .1 



NUH,-(SP) 



.WNOOE*! 




16 SOHOOE^l 

gA00EM,R4 
i6.R4 

12(SP);R5 



R5 

SOHOOE 
•^77770, R3 
R4 



2S _ 

(SPH.RS 
(9H,R4 
R3 



2(SP) 4(SP) 
0 



for^tSeout 



TYPED 



mi m'Mi^ ' 



D€ ZERO FILL SWITCH 
,„ FOR SIxTb) DIGITS^ 

iTBWiOH com 

R4 



•GET TIC NUnER OF DIGITS TO TYPE 

IT n ^ NflX. MJ.OICD 

_ zSoTia SWITCH 
PigOF T)C INPUT IfJHBER 
apRT»C OUTPUT HOTO 
ROtStE «B INTO -C- 




MM 



DIGIT 



GET LS OF THIS DIGIT 
TYPE THIS DIGIT? 



IF NO 




THIS 0? 

, MfYNORE O'S 

nrnJIFflism 
THis'tSeiT 

TO DO 

T A BLANK 



SfROK FOR RETURNING 

S^oiiME FOR ASCII DIGIT 
TERHINATOR FOR TYPE ROUTINE 
OCTAL DIGIT COUNTER 
ErO FILL SWITCH 



HOb 



SEO 0072 



(1) 0837Sb 000000 
18S7 
1 
1 
1 



» * 
1) 




024062 OIL . 




(gtl04 176543 



MflOOE: .UOfV) 0 :;NUrCER OF DIGITS TO TYPE 

; M I MMMI I MlMMMMIMMIM I IHMMMM I »HtilMHMBMIMimMM t#WHHHHHHHWIi 

.SBTTL (MNDOn rUCER GOCfMTOR ROUTINE 

;fTHIS ROUTIfC IS A DOUBLE PRECISION PSEUOO RRIOON NUNBER GENERATOR 
•MjlTH A RANK OF 0 TO 2(433)-l. 



1: 



Sturn 



IS: 



isi; 

NOV 
NOV 
NOV 

!$y 

NOV 

CLR 

1^ 

ROL 
INC 

f& 

ADC 



rts 

shinuh: .moro 
slonuh: .uoro 



PC.SRAND 



Rl -(&) 
R2 

m« 

RO 
Rl 
R2 
R3 

^OiaiiRO 
glNUN^Rl 
I1057,RO 
!g 

•47H01,R1 
R2 

Ri,B.ONUH 
RilSfI{Ut 

(&)^;r2 



COLL THE ROUT 
WINUN.SLI 



INE 

T»C RANDOH 
U. BE IN 
ONUN 



PUSH RO ON STACK 
PUSH Rl ON STACK 

ON STACK 

ON STACK 
RO HITH LOU 
T Rl HITH HIGH 
~ SHIFT COUNT 




ilAT^flkSr 





AND 

^ INTO Rl AM) 

ROTATI CARRY INTO R2 
C»CCK FOR DONE 

CARRY 

AOO NyHSR^T^^NAKE X 129 

rfiTANT 
PROPOGATE CARRY 

^HKHfeT COHSTART 
^irC RO HITH HIGHEST DIGIT 
PROPOGATE CARRY 
RO 
Rl 

. STACK INTO R3 
POP STACK INTO R2 
POP STACK INTO Rl 
POP STACK INTO RO 
RETURN 



tKJULMJUlMI 



.SBTTL TRAP DECODER 

:»THIS ROUTINE HILL PICKUP THE LOMK BYTE OF THE "TRAP" INSTRUCTION.. 
•Mi^lHo INDEX T^^ THETRAP TABLE FOR THE STARTING ADDRESS 
•OF TIC DESIRb mUTINTIricN USING THE ADDRESS OBTAINED IT UILL 
«G0 TO THAT ROUTINE. 



11 27(732) 2H-MJ6-7b 14:41 



lOB 

PAGE 1-S9 



SEO 0073 



9) 



000002 



024110 0100% 

giiP SISS 024132 
024130 000200 



STWP: NOV 



m 

ASL 
ffOV 
RT5 



RO^(SP) 

(RO),RO 

STRPM)(M)),RO 
RO 



SAVE RO 




.QHT 
ITIOH F . 
INDEX TO TABLE 
QO TO ROUTINE 




.SBTTL TRAP TABLE 



;iTHIS TABLE^AINS TtC STARTING 
|«8Y THE^TRAP- INSTRUCTION. 



ADDRESSES OF THE ROUTINES CALLED 




iTRPAO: 



ROUTIIC 



STYPE 
STr 



CAUsTYPE 

CALLsTYPOC 

CAasTYP^ 

CAU; _ 

IN 

T 




TRAP40( 104400) 
TRAPHt 104401) 
TRAP42(lQ44ffi) 
TRAP43(l344S) 
TRAP^(l544m) 
TRAP45( 104405) 
TRAP46(1Q44(K) 
TRAP*7( 104407) 



TTY 



TYPEOUT 
OCTAL 
OCTAL 

[ OCTAL 



ROUTINE 
~ (HITH 




LEAOI 
"INC 
LAST 



PICINAL rUH» (UI^ SIGN) 
TYPEIN CHAMCTER ROUTINE 
TYPEIN STRING ROUTIIC 
READ AN OCTAL NieER FROM TTY 




; MMmMHmiMMMHMIMMIMMMIMMM»MIMHHHMUMMmMIMMMI« I MMm»M 



.SBTTL POtfR OOUN AND UP ROUTINES 



mm m 

1100% 



024274 



m 



OOm ROUTII 




00077b 



NOV 
NOV 

NQV 
NOV 

NOV 

NOV 
NOV 



RO,-{SP) 

ra -(SP) 
re'^il) 

PiSSAVRb 
•I^HRUP.aaPURVEC 

.-2 



FOR FAST UP 
0:7 
RO ON STACK 

R2 ON STAJS 

PUSH R3 ON STACK 
R4 ON STACK 
~ ON STACK 




SSET UP VECTOR 
HANG UP 




0242 




iPOUER UP ROUTINE 
iPURUP: NOV 
CLR 

11: INC 




4242 012603 

IS 8ill8! 

m m 



NOV 
NOV 
NOV 
NOV 
NOV 



(^)4,R5 
R4 

(SP)<^ R3 
($)♦ R2 
(3>)4 Rl 



024152 000024 



SlT^OOP FOR T»C TTY 
UAIT FOR T»C INC 




ACK INTO R4 
POP STACK INTO R3 
POP STACK INTO R2 
POP STACK INTO Rl 



NfllHOCC-ll-OZVTCrC 
DZVTCC.P13 



poiCR Dom MO UP muTirfe 



14:41 



024260 
0242tt 



012737 




000026 



JI'MUw 



NOV 



047520 042527 



SILLUP: HPLT 
BR 

?ASCXZ 



BUFFER: 



.EVEN 
0 

.EM) 



JOB 

PAGE 1-60 

ta40,aiPURVEC«2 
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